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GETTING  STARTED  WITH  YOUR  APPLE  II 


Unpacking 

Don't  throw,  away  the  packing  material.    Save  it  for  the  unlikely 
event  that  you  may  need  to  return  your  Apple  II  for  warrantee  repair. 
If  you  bought  an  Apple  II  Board  only,  see  hardware  section  in  this 
manual  on  how  to  get  started.    You  should  have  received  the  following*. 

1.  Apple  II  system  including  mother  printed  circuit  board 
with  specified  amount  of  RAM  memory  and  8K  of  ROM  memory, 
switching  power  supply,  keyboard,  and  case  assembly. 

2.  Accessories  Box  including  the  following: 

a.  This  manual  including  warranty  card. 

b.  Pair  of  Game  Paddles 

c.  A.C.  Power  Cord 

d.  Cassette  tape  with  "Breakouf'on  one  side 
and  "Color  Demos"  on  the  other  side. 

e.  Cassette  recorder  interface  cable  (miniature 
phone  jack  type) 

3.  If  you  purchased  a  16K  or  larger  system,  your  accessory 
box  should  also  contain: 

a.  16K  Startrek  game  cassette  with  High  Resolution 
Graphics  Demo  ("HIRES")  on  the  flipside. 

b.  Applesoft  Floating  Point  Basic  Language  Cassette 
with  an  example  program  on  the  other  side. 

c.  Applesoft  reference  manual 

4.  In  addition  other  items  such  as  a  vinyl  carrying  case 
or  hobby  board  peripherial  may  have  been  included  if 
specifically  ordered  as  "extras". 

Notify  your  dealer  or  Apple  Computer,  Inc.  immediately  if  you  are 
missing  any  items. 

Warranty  Registration  Card 

Fill  this  card  out  immediately  and  completely  and  mail  to  Apple  in 
order  to  register  for  one  year  warranty  and  to  be  placed  on 
owners  club  mailing  list.    Your  Apple  II 's  serial  number  is  located 
on  the  bottom  near  the  rear  edge.    You  model  number  is: 

A2SjO0MMX 

MM  is  the  amount  of  memory  you  purchased.    For  Example: 

A2S0008X 
is  an  8K  Byte  Apple  II  system. 
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Check  for  Damage 


Inspect  the  outside  case  of  your  Apple  for  shipping  damage.  Gently 
lift  up  on  the  top  rear  of  the  lid  of  the  case  to  release  the  lid 
snaps  and  remove  the  lid.    Inspect  the  inside.    Nothing  should  be 
loose  and  rattling  around.    Gently  press  down  on  each  integrated 
circuit  to  make  sure  that  each  is  still  firmly  seated  in  its 
socket.     Plug  in  your  game  paddles  into  the  Apple  II  board  at  the 
socket  marked  "GAME  I/O"  at  location  J14.    See  hardware  section  of 
this  manual  for  additional  detail.    The  white  dot  on  the  connector 
should  be  face  forward.    Be  careful  as  this  connector  is  fragile. 
Replace  the  lid  and  press  on  the  back  top  of  it  to  re-snap  it  into 
place. 

Power  Up 

First,  make  sure  that  the  power  ON/OFF  switch  on  the  rear  power 
supply  panel  on  your  Apple  II  is  in  the  "OFF"  position.  Connect 
the  A.C.  power  cord  to  the  Apple  and  to  a  3  wire  120  volt  A.C. 
outlet.    Make  sure  that  you  connect  the  third  wire  to  ground  if 
you  have  only  a  two  conductor  house  wiring  system.    This  ground 
is  for  your  safety  if  there  is  an  internal  failure  in  the  Apple 
power  supply,  minimizes  the  chance  of  static  damage  to  the  Apple, 
and  minimizes  RFI  problems. 

Connect  a  cable  from  the  video  output  jack  on  the  back  of  the  Apple 
to  a  TV  set  with  a  direct  video  input  jack.    This  type  of  set  is 
commonly  called  a  "Monitor".    If  your  set  does  not  have  a  direct 
video  input,  it  is  possible  to  modify  your  existing  set.    Write  for 
Apple's  Application  note  on  this.    Optionally  you  may  connect  the 
Apple  to  the  antenna  terminals  of  your  TV  if  you  use  a  modulator. 
See  additional  details  in  the  hardware  section  of  this  manual  under 
"Interfacing  with  the  Home  TV". 

Now  turn  on  the  power  switch  on  the  back  of  the  Apple.    The  indicator 

light  (it's  not  a  switch)  on  the  keyboard  should  now  be  ON.  If 

not,  check  A.C.  connections.    Press  and  release  the  "Reset"  button 

on  the  keyboard.    The  following  should  happen:    the  Apple's  internal 

speaker  should  beep,  an  asterisk  ("*")  prompt  character  should  appear 

at  the  lower  left  hand  corner  of  your  TV,  and  a  flashing  white  square 

should  appear  just  to  the  right  of  the  asterisk.    The  rest  of  the 

TV  screen  will  be  made  up  of  radom  text  characters  (typically  question  marks). 

If  the  Apple  beeps  and  garbage  appears  but  you  cannot  see  an  "*"  and  the 
cursor,  the  horizontal  or  vertical  height  settings  on  the  TV  need  to  be 
adjusted.    Now  depress  and  release  the  "ESC"  key,  then  hold  down  the 
"SHIFT"  key  while  depressing  and  releasing  the  P  key.    This  should 
clear  your  TV  screen  to  all  black.    Now  depress  and  release  the  RESET 
key  again.    The  "*"  prompt  character  and  the  cursor  should  return  to 
the  lower  left  of  your  TV  screen. 
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Apple  Speaks    Several  Languages 


The  prompt  character  indicates  which  language  your  Apple  is  currently 
in.    The  current  prompt  character,  an  asterisk  ("*"),  indicates  that 
you  are  in  the  "Monitor"  language,  a  powerful  machine  level  language 
for  advanced  programmers.    Details  of  this  language  are  in  the 
"Firmware"  section  of  this  manual. 

Apple  Integer  BASIC 

Apple  also  contains  a  high  level  English  oriented  language  called 
Integer  BASIC,  permanently  in  its    ROM  memory.    To  switch  to  this 
language  hold  down  the  "CTRL"  key  while  depressing  and  releasing  the 
"B"  key.    This  is  called  a  control-B  function  and  is  similiar  to 
the  use  of  the  shift  key  in  that  it  indicates  a  different  function 
to  the  Apple.    Control  key  functions  are  not  displayed  on  your 
TV  screen  but  the  Apple  still  gets  the  message.    Now  depress  and 
release  the  "RETURN"  key  to  tell  Apple  that  you  have  finished  typing 
a  line  on  the  keyboard.    A  right  facing  arrow  (">")  called  a  caret 
will  now  appear  as  the  prompt  character  to  indicate  that  Apple  is 
now  in  its  Interger  BASIC  language  mode. 

Running  Your  First  and  Second  Program 

Read  through  the  next  three  sections  that  include: 

1.  Loading  a  BASIC  program  Tape 

2.  Breakout  Game  Tape 

3.  Color  Demo  Tape 

Then  load  and  run  each  program  tape.    Additional  information  on 
Apple  II 1 s  interger  BASIC  is  in  the  next  section  of  this  manual. 

Running  16K  Startrek 

If  you  have  16K  Bytes  or  larger  memory  in  your  Apple,  you  will  also 
receive  a  "STARTREK"  game  tape.    Load  this  program  just  as  you  did 
the  previous  two,  but  before  you  "RUN"  it,  type  in  "HIMEM:  16384" 
to  set  exactly  where  in  memory  this  program  is  to  run. 
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LOADING  A  PROGRAM  TAPE 


INTRODUCTION 

This  section  describes  a  procedure  for  loading  BASIC  programs 
successfully  into  the  Apple  II.    The  process  of  loading  a  program  is  divided 
into  three  section;    System  Checkout,  Loading  a  Tape  and  What  to  do  when 
you  have  Loading  Problems.    They  are  discussed  below. 

When  loading  a  tape,  the  Apple  II  needs  a  signal  of  about  2  1/2  to  5 
volts  peak-to-peak.    Commonly,  this  signal  is  obtained  from  the  "Monitor" 
or  "earphone"  output  jack  on  the  tape  recorder.    Inside  most  tape  recorders, 
this  signal  is  derived  from  the  tape  recorder's  speaker.    One  can  take 
advantage  of  this  fact  when  setting  the  volume  levels.    Using  an  Apple 
Computer  pre-recorded  tape,  and  with  all  cables  disconnected,  play  the  tape 
and  adjust  the  volume  to  a  loud  but  un-distorted  level.    You  will  find  that 
this  volume  setting  will  be  quite  close  to  the  optimum  setting. 

Some  tape  recorders  (mostly  those  intended  for  use  with  hi-fi  sets) 
do  not  have  an  "earphone"  or  high-level  "monitor"  output.    These  machines 
have  outputs  labeled  "line  output"  for  connection  to  the  power  amplifier. 

The  signal  levels  at  these  outputs  are  too  low  for  the  Apple  II  in  most  cases. 

Cassette  tape  recorders  in  the  $40  -  $50  range  generally  have  ALC 
(Automatic  Level  Control)  for  recording  from  the  microphone  input.    This  feature 
is  useful  since  the  user  doesn't  have  to  set  any  volume  controls  to  obtain 
a  good  recording.    If  you  are  using  a  recorder  which  must  be  adjusted,  it 
will  have  a  level  meter  or  a  little  light  to  warn  of  excessive  recording  levels. 
Set  the  recording  level  to  just  below  the  level  meter's  maximum,  or  to  just  a 
dim  indication  on  the  level  lamp.    Listen  to  the  recorded  tape  after  you've 
saved  a  program  to  ensure  that  the  recording  is  "loud  and  clear". 

Apple  Computer  has  found  that  an  occasional  tape  recorder  will  not  function 
properly  when  both  Input  and  Output  cables  are  plugged  in  at  the  same  time. 
This  problem  has  been  traced  to  a  ground  loop  in  the  tape  recorder  itself  which 
prevents  making  a  good  recording  when  saving  a  program.    The  easiest  solution 
is  to  unplug  the  "monitor"  output  when  recording.    This  ground  loop  does  not 
influence  the  system  when  loading  a  pre-recorded  tape. 
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Tape  recorder  head  alignment  is  the  most  common  source  of  tape  recorder 
problems.    If  the  playback  head  is  skewed,  then  high  frequency  information 
on  pre-recorded  tapes  is  lost  and  all  sorts  of  errors  will  result.    To  confirm 
that  head  alignment  is  the  problem,  write  a  short  program  in  BASIC.  >10  END 
is  sufficient.    Then  save  this  program.    And  then  rewind  and  load  the  program. 
If  you  can  accomplish  this  easily  but  cannot  load  pre-recorded  tapes,  then 
head  alignment  problems  are  indicated. 

Apple  Computer  pre-recorded  tapes  are  made  on  the  highest  quality  professional 
duplicating  machines,  and  these  tapes  may  be  used  by  the  service  technician  to 
align  the  tape  recorder's  heads.    The  frequency  response  of  the  tape  recorder 
should  be  fairly  good;  the  6  KHz  tone  should  be  not  more  than  3  db  down  from 
a  1  KHz  tone,  and  a  9  KHz  tone  should  be  no  more  than  9  db  down.    Note  that 
recordings  you  have  made  yourself  with  mis-aligned  heads  may  not  not  play 
properly  with  the  heads  properly  aligned.    If  you  made  a  recording  with  a 
skewed  record  head,  then  the  tiny  magnetic  fields  on  the  tape  will  be  skewed  as 
well,  thus  playing  back  properly  only  when  the  skew  on  the  tape  exactly  matches 
the  skew  of  the  tape  recorder's  heads.    If  you  have  saved  valuable  programs  with 
a  skewed  tape  recorder,  then  borrow  another  tape  recorder,  load  the  programs  with 
the  old  tape  recorder  into  the  Apple,  then  save  them  on  the  borrowed  machine. 
Then  have  your  tape  recorder  properly  aligned. 

Listening  to  the  tape  can  help  solve  other  problems  as  well.    Flaws  in  the 
tape,  excessive  speed  variations,  and  distortion  can  be  detected  this  way. 
Saving  a  program  several  times  in  a  row  is  good  insurance  against  tape  flaws. 
One  thing  to  listen  for  is  a  good  clean  tone  lasting  for  at  least  3  1/2  seconds 
is  needed  by  the  computer  to  "set  up"  for  proper  loading.    The  Apple  puts  out 
this  tone  for  anout  10  seconds  when  saving  a  program,  so  you  normally  have 
6  1/2  seconds  of  leeway.    If  the  playback  volume  is  too  high,  you  may  pick  up  tape 
noise  before  getting  to  the  set-up  tone.    Try  a  lower  playback  volume. 

SYSTEM  CHECKOUT 

A  quick  check  of  the  Apple  II  computer  system  will  help  you  spot  any 
problems  that  might  be  due  to  improperly  placed  or  missing  connections  between 
the  Apple  II,  the  cassette  interface,  the  Video  display,  and  the  game 
paddles.   This  checkout  procedure  takes  just  a  few  seconds  to  perform  and 
is  a  good  way  of  insuring  that  everything  is  properly  connected  before  the 
power  is  turned  on. 
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1      POWER  TO  APPLE  -  check  that  the  AC  power  cord  is  p  ugged 
into  an  appropriate  wall  socket  which  includes  a  'true 
ground  and  is  connected  to  the  Apple  II. 

2.  CASSETTE  INTERFACE  -.check  that  at  least  ™  "ssette 
cable  double  ended  with  miniature  phone  tip  jacks  is 
connect^  between  the  Apple  II  cassette  Input  port  and 
the  tape  recorder's  MONITOR  plug  socket. 

3.  VIDEO  DgPlAY  _  ^  ^  & 

}        the  monitor  to  the  Apple's  video  output  port, 
b)        for  a  standard  television  -  check  that  an  adapter 
}        (RF  modulator)  is  plugged  into  the  Apple  II  (e  ther 
n  the  video  output  (K  14)  or  the  video  auxiliary 
socket  (J148),  and  that  a  cable  runs  between  the 
television  and  the  Adapter's  output  socket. 

a      GAME  PADDLE  INTERFACE  -  if  paddles  are  to  be  used,  check 
Sat  they  are  connected  into  the  Game  I/O.connector  (J14) 
on  the  right-hand  side  of  the  Apple  II  mainboard. 

5.     POWER  ON  -  flip  on  the  power  switch  in  back  of  the  Apple  II, 
the  "power"  indicator  on  the  keyboard  will  light.  Also 
make  sure  the  video  monitor  (or  TV  set)  is  turned  on. 

After  the  Apple  II  system  has  been  powered  up  and  the  video  display 
presents  a  random  matrix  of  question  marks  or  other  text  characters  the 
following  procedure  can  be  followed  to  load  a  BASIC  program  tape: 

Xn\fterfck!T"*"!should  appear  on  the  lefthand  side 

of  the  screen  below  the  random  text  pattern     J  flashing 

white  cursor  will  appear  to  the  right  of  the  astenck. 

2.     Hold  down  the  CTRL  key,  depress  and  releas J J*e  B  key, 
then  depress  the  "RETURN"  key  and  release  the   CTRL  key. 
A  right  facing  arrow  should  appear  on  the  lefthand  side 
of  the  screen  with  a  flashing  cursor  next  to  it.    If  it 
doesn't,  repeat  steps  1  and  2. 

3      Type  in  the  word  "LOAD"  on  the  keyboard.    You  should  see 
the  word  in  between  the  right  facing  |J^RJ!Id.  ^ 
flashing  cursor.    Do  not  depress  the  "RETURN    key  yet. 

4.  Insert  the  program  cassette  into  the  tape  recorder  and 
rewind  it. 

5.  If  not  already  set,  adjust  the  Volume  control  to  50-70% 
maximum.    If  present,  adjust  the  Tone  control  to  80-100/- 


maximum. 
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6.  Start  the  tape  recorder  in  "PLAY"  mode  and  now  depress 
the  "RETURN"  key  on  the  Apple  II. 

7.  The  cursor  will  disappear  and  Apple  II  will  beep  in  a 
few  seconds  when  it  finds  the  beginning  of  the  program. 
If  an  error  message  is  flashed  on  the  screen,  proceed 
through  the  steps  listed  in  the  Tape  Problem  section 
of  this  paper. 

8.  A  second  beep  will  sound  and  the  flashing  cursor  will 
reappear  after  the  program  has  been  successfully  loaded 
into  the  computer. 

9.  Stop  the  tape  recorder.    You  may  want  to  rewind  the  program 
tape  at  this  time. 

10.  Type  in  the  word  "RUN"  and  depress  the  "RETURN"  key. 

The  steps  in  loading  a  program  have  been  completed  and  if  everying  has 
gone  satisfactorily  the  program  will  be  operating  now. 

LOADING  PROBLEMS 

Occasionally,  while  attempting  to  load  a  BASIC  program  Apple  II 
beeps  and  a  memory  full  error  is  written  on  the  screen.    At  this  time 
you  might  wonder  what  is  wrong  with  the  computer,  with  the  program  tape, 
or  with  the  cassette  recorder.    Stop.    This  is  the  time  when  you  need 
to  take  a  moment  and  checkout  the  system  rather  than  haphazardly  attempt- 
ing to  resolve  the  loading  problem.    Thoughtful  action  taken  here  will 
speed  in  a  program's  entry.    If  you  were  able  to  successfully  turn  on  the 
computer,  reset  it,  and  place  it  into  BASIC  then  the  Apple  II  is  probably 
operating  correctly.    Before  describing  a  procedure  for  resolving  this 
loading  problem,  a  discussion  of  what  a  memory  full  error  is  in  order. 

The  memory  full  error  displayed  upon  loading  a  program  indicates  that 
not  enough  (RAM)  memory  workspace  is  available  to  contain  the  incoming  data. 
How  does  the  computer  know  this?    Information  contained  in  the  beginning  of 
the  program  tape  declares  the  record  length  of  the  program.    The  computer 
reads  this  data  first  and  checks  it  with  the  amount  of  free  memory.  If 
adequate  workspace  is  available  program  loading  continues.    If  not,  the 
computer  beeps  to  indicate  a  problem,  displays  a  memory  full  error  statement, 
stops  the  loading  procedure,  and  returns  command  of  the  system  to  the  key- 
board.   Several  reasons  emerge  as  the  cause  of  this  problem. 
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Memory  Size  too  Small 

Attempting  to  load  a  1«  program  into  a  4K  Apple  II  will  generate  this 
ki„d  f Trror  message.    It  is  called  loading  too  large  of  a  program,  he 
solutiL  is  straight  forward:  only  load  appropriately  sized  programs  mto 

suitably  sized  systems.  pointers 

Another  possible  reason  for  an  error  message  is  that  the memo  y  p 
^hich  indicate  the  bounds  of  available  *mory  have  been  pre  et      a  » «  ler 
capacity    This  could  have  happened  through  prevnous  usage  of  the  HKN 
Z^L,  statements.   The  solution  is  -  -et  the  pointers  by  ) 

command.   Hold  the  cm  »   ~     5  e  et  ^ysL  to  max- 

the  RETURN  key  and  release  the  CTRL  key.    mis  w 

imum  caoacitv. 


Cassette  Recorder  Inadjustment 

If  the  Volume  and  Tone  controls  on  the  cassette  recorder  are  not 
properly  set  a  memory  full  error  can  occur.    The  solution  is  to  adjust 
the  Volume  to  50-70%  maximum  and  the  Tone  (if  it  exists)  to  8?-lW* 
maximum.* 

A  second  common  recorder  problem  is  skewed  head  azimuth.  Jhen 
the  tape  head  is  not  exactly  perpendicular  to  the  edges  of  the  magnetic 
tape  some  of  the  high  frequency  data  on  tape  can  be  skipped.    This  causes 
missing  bits  in  the  data  sent  to  the  computer.    Since  the  first  data  read 
is  record  length  an  error  here  could  cause  a  memory  full  error  to  be 
generated  because  the  length  of  the  record  is  inaccurate.   The  solution: 
adjust  tape  head  azimuth.    It  is  recommended  that  a  competent  technician 
at  a  local  stereo  shop  perform  this  operation. 
Often  times  new  cassette  recorders  will  not  need  this  adjustment. 


for  program  loading. 
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Tape  Problems 

A  memory  full  error  can  result  from  unintentional  noise  existing  in 
a  program  tape.    This  can  be  the  result  of  a  program  tape  starting  on  its 
header  which  sometimes  causes  a  glitch  going  from  a  nonmagnetic  to  magnetic 
recording  surface  and  is  interpreted  by  the  computer  as  the  record  length. 
Or,  the  program  tape  can  be  defective  due  to  false  erasure,  imperfections 
in  the  tape,  or  physical  damage.    The  solution  is  to  take  a  moment  and 
listen  to  the  tape.    If  any  imperfections  are  heard  then  replacement  of  the 
tape  is  called  for.    Listening  to  the  tape  assures  that  you  know  what  a 
"good"  program  tape  sounds  like.    If  you  have  any  questions  about  this  plea 
contact  your  local  dealer  or  Apple  for  assistance. 


If  noise  or  a  glitch  is  heard  at  the  beginning  of  a  tape  advance  the 
tape  to  the  start  of  the  program  and  re-Load  the  tape. 

Dealing  with  the  Loading  Problem 

With  the  understanding  of  what  a  memory  full  error  is  an  efficient  way 
of  dealing  with  program  tape  loading  problems  is  to  perform  the  following 
procedure: 

1.  Check  the  program  tape  for  its  memory  requirements. 
Be  sure  that  you  have  a  large  enough  system. 

2.  Before  loading  a  program  reset  the  memory  pointers 
with  the  Bc  (control  B)  command. 

3.  In  special  cases  have  the  tape  head  azimuth 
checked  and  adjusted. 

4.  Check  the  program  tape  by  listening  to  it. 

a)  Replace  it  if  it  is  defective,  or 

b)  start  it  at  the  beginning  of  the  program. 

5.  Then  re-LOAD  the  program  tape  into  the  Apple  II. 

In  most  cases  if  the  preceeding  is  followed  a  good  tape  load  will  result. 
UNSOLVED  PROBLEMS 

If  you  are  having  any  unsolved  loading  problems,  contact  your 
nearest  local  dealer  or  Apple  Computer  Inc. 
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BREAKOUT  GAME  TAPE 


PROGRAM  DESCRIPTION 

Breakout  is  a  color  graphics  game  for  the  Apple  II  computer.    The  object  of 
the  game  is  to  "knock-out'  all  160  colored  bricks  from  the  playing  field  by 
hitting  them  with  the  bouncing  ball.    You  direct  the  ball  by  hitting  it  with 
a  paddle  on  the  left  side  of  the  screen.    You  control  the  paddle  with  one  of 
the  Apple's  Game  Paddle  controllers.    But  watch  out:  you  can  only  miss  the 
ball  five  times! 

There  are  eight  columns  of  bricks.    As  you  penetrate  through  the  wall  the 
point  value  of  the  bricks  increases.    A  perfect  game  is  72(21  points;  after 
five  balls  have  been  played  the  computer  will  display  your  score  and  a 
rating  such  as  "Very  Good".  "Terrible! ",  etc.    After  ten  hits  of  the  ball, 
its  speed  with  double,  making  the  game  more  difficult.    If  you  break  through 
to  the  back  wall,  the  ball  will  rebound  back  and  forth,  racking  up  points. 

Breakout  is  a  challenging  game  that  tests  your  concentration,  dexterity, 
and  skill . 

REQUIREMENTS 

This  program  will  fit  into  a  4K  or  greater  system. 
BASIC  is  the  programming  language  used. 

PLAYING  BREAKOUT 

1.  Load  Breakout  game  following  instructions  in  the  "Loading 
a  BASIC  Program  from  Tape"  section  of  this  manual. 

2.  Enter  your  name  and  depress  RETURN  key. 

3.  If  you  want  standard  BREAKOUT  colors  type  in  Y  or  Yes 
and  hit  RETURN.    The  game  will  then  begin. 

4.  If  the  answer  to  the  previous  questions  was  N  or  No 
then  the  available  colors  will  be  displayed.  The 
player  will  be  asked  to  choose  colors,  represented  by  a 
number  from     to  15,  for  background,  even  bricks,  odd 
bricks,  paddle  and  ball  colors.    After  these  have  been 
chosen  the  game  will  begin. 


5.        At  the  end  of  the  game  you  will  be  asked  if  they 

want  to  play  again.    A  Y  or  Yes  response  will  start 
another  game.    A  N  or  No  will  exit  from  the  program. 

NOTE:    A  game  paddle  (150k  ohm  potentiometer)  must  be  connected 
to  PDL  (0)  of  the  Game  I/O  connector  for  this  game. 


COLOR  DEMO  TAPE 


PROGRAM  DESCRIPTION 

COLOR  DEMO  demonstrates  some  of  the  Apple  II  video  graphics 
capabilities.    In  it  are  ten  examples:    Lines,  Cross,  Weaving, 
Tunnel,  Circle,  Spiral,  Tones,  Spring,  Hyperbola,  and  Color  Bars. 
These  examples  produce  various  combinations  of  visual  patterns 
in  fifteen  colors  on  a  monitor  or  television  screen.    For  example, 
Spiral  combines  colorgraphics  with  tones  to  produce  some  amusing 
patterns.    Tones  illustrates  various  sounds  that  you  can  produce 
with  the  two  inch  Apple  speaker.    These  examples  also  demonstrate 
how  the  paddle  inputs  (PDL(X))  can  be  used  to  control  the  audio 
and  visual  displays.    Ideas  from  this  program  can  be  incorporated 
into  other  programs  with  a  little  modification. 

REQUIREMENTS 

4K  or  greater  Apple  II  system,  color  monitor  or  television, 
and  paddles  are  needed  to  use  this  program.    BASIC  is  the  pro- 
gramming language  used. 
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BREAKOUT  GAME 
PROGRAM  LISTING 


PROGP.AM  LISTING 
5  GOTO  15 

18  Q=(  PDL  (85-285/6:  IF  S<8  THEN 
8=8:  IF  Q>=34  THEN  8=34:  C0L0R= 
D:  VLIH  8,8+5  AT  8i  C0L0R=A: 
IF  F>Q  THEN  175;  IF  Q  THEN 
VLIH  8,9-1  RT  8:P=Q:  RETURN 

15  DIM  flt(15),B«iB):R=l:B=13: 

C=9:D=6:E=i5:  TEXT  :  CRLL  - 
936:  VTflB  4:  TRB  18:  PRINT 
'«*  BREAKOUT  ***a:  PRINT 
£8  PRINT  5      OBJECT  IS  TO  DESTROY 
HLL  BRICKS5:  PRINT  :  INPUT 
aHl,  yHfirS  YOUR  NflfiE?  ',f» 

£5  PRINT  '5TRNDRRD  COLORS  !;fi$ 
;:  INPUT  5  iVN?  \B$:  GR  :  CRLL 
-936:  IF  B$(l,l)iT  THEN  48 
:  FOR  1=8  TO  39:  C0LQR=I/2* 
(K325:  VLIN  8,39  AT  I 

38  NEXT  I:  POKE  34,28;  PRINT  : 
PRINT  :  PRINT  :  FOR  1=8  TO 
15:  VTflB  21+1  MOD  2;  TftB  1+ 
1+1;  PRINT  U:  NEXT  I:  POKE 
34,22:  VlHB  24:  PRINT  :  PRINT 
"BACKGROUND": 

35  GGSUB  95:H=E:  PRINT  KEvEH  BRICK" 
;:  GOSUB  95:B=E;  PRINT  "ODD  BRIC 
i"u  GOSUB  95;C=E:  PRINT  "PADDLE 
';:  GOSUB  95;D=E:  PRINT  "BALL3 
GOSUB  95 

48  POKE  34,26;  COLORS  FOR  1= 
8  TO  39:  VLIH  8,39  AT  I:  NEXT 
i:  FOR  1=28  TO  34  STEP  2;  TAB 
I+h  PRINT  1/2-9;:  COLOR=B: 
VLIN  8,39  BT  I:  COLOR=C:  FOR 
J=I  HOD  4  TO  39  STEP  4 


45  VLIN  J.J+i  RT  I:  NEXT  J.I:  TfiB 
5:  PRINT  "SCORE  =  85:  PRINT 
:  PRINT  :  POKE  34,21;S=8:P= 
S:L=S;X=19:Y=19:L=6 

58  COLOR=fl:  PLOT  X,Y/3;X=19:Y= 
RND  (128)sV=-IjB=  RND  (55- 
2:L=L-1:  IF  L<1  THEN  128:  TAB 
6:  IF  L>1  THEN  PRINT  Lr  BfiLLS  L 
EFT8 

55  IF  L=l  THEN  PRINT  5LAST  BULL,  5 
;R«:  PRINT  :  FOR  I=i  TO  188 
:  GOSUB  18:  NEXT  i:H=l:N=8 

68  J=Y+V:  IF  J)=8  BHD  J<12§  THEN 
65:y=-i:J=Y:  FOR  1=1  TO  6:K= 
PEEK  (-163365;  NEXT  I 

65  I=X+V:  IF  10  THEN  188:  GOSUB 
178:  C0L0R=fl:K=J/3:  IF  1)39 
THEN  75:  IF  SCRN(I,K5=fi  THEN 
85:  IF  I  THEN  188:N=N*1:V=( 
N>5)+l:y=(K-P)*2-5:«=i 

78  Z=  PEEK  (-16336)-  PEEK  (-16336 
)+  PEEK  (-16336)-  PEEK  (-16336 
)t  PEEK  (-163365-  PEEK  (-16336 
it  PEEK  (-16336):  GOTO  85 

75  FOR  1=1  TO  6:R=  PEEK  (-16336 
5:  NEXT  I:I=X:N=8 

86  V=-V 

85  PLOT  X,Y/3:  COLOR=E:  PLOT  I, 

K:X=1:Y=J:  GOTO  68 
38  PRINT  K IHVRLID.  REENTER5; 
95  INPUT  5  COLOR  (8  TO  155%E: 
IF  E<8  OK  E>15  THEN  98:  RETURN 


188  IF  H  THEN  V=  fiBS  (¥5:  VLIH 
K/2*2,K/2*2*1  RT  l:S=S+I/2- 
9;  VTfiB  21:  TRB  13:  PRINT  S 

185  0=  PEEK  (-163365-  PEEK  (-16336 
5+  PEEK  (-163665-  PEEK  (-16336 
5+  PEEK  (-163365-  PEEK  (-16336 
5+  PEEK  (-163365-  PEEK  (-16336 
5+  PEEK  (-163365-  PEEK  (-16336 
5 

118  IF  S<?28  THEN  88 

115  PRINT  'CONGRATULATIONS,  5;Rf 

f  YOU  sINI8:  GOTO  165 
128  PRINT  "YOUR  SCORE  OF  *jS}"  IS  5 

;:  GOTO  125+(S/1885*5 
125  PRINT  'TERRIBLE!5;  GOTO  165 

138  PRINT  GOTO  165 

135  PRINT  'POOR.5:  GOTO  165 
148  PRINT  5FA1R.S:  GOTO  165 
145  PRINT  "GOOD.5:  GOTO  165 
158  PRINT  'VERY  GOOD.5:  GOTO  165 

155  PRINT  'EXCELLENT.5;  GOTO  165 

168  PRINT  "NEARLY  PERFECT. 5 
165  PRINT  5 ANOTHER  GflHE  5;Ht:5  (Y/H5 
";:  INPUT  HI;  IF  Hf(l,15="Y" 
THEN  £5:  TEXT  :  CALL  -936: 
VTflB  18:  TRB  18:  PRINT  5GflBE  OV 
ER":  END 

178  8=(  PDL  (85-285/6:  IF  Q<8  THEN 
Q=8:  IF  Q>=34  THEN  8=34:  €010*= 
D:  VLIN  8,8+5  AT  8;  COLOR=H: 
IF  P>9  THEN  175:  IF  8  THEN 
VLIN  8.0-1  RT  8:P=Q:  RETURN 

175  IF  P=Q  THEN  RETURN  :  IF  QI34 
THEN  VLIN  Q+6,39  AT  8;P=S: 
RETURN 

188  FOR  1=1  TO  88:8=  PEEK  (-16336 
5:  NEXT  I:  GOTO  58 
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COLOR  DEMO  PROGRAM 
LISTING 


PROGRAM  LISTING 

li  bin  C(4/=  FCfl  2.173=  FuKE 
:,4S:  =7E  =,;93:  Ff^E  5,1.5 

:   r>t  3=6  =  7  *GG;  K-fL 

35:i=:  =0^E  9,252;  ^E  lcf 
165:  FGr.r 


366  j=jti-j=j  m  22th  i-Qk  l=i 
tg  :295;  gGlGR=i     Gt-t  plc~ 
.1*1.  m  s:f C  15= 

I;  G73.B  16666;  GUG  :66 
4:6  FGR  1=1  ~G  4;iy  L-  ^K-   1:  / 

:   HEaI  I 

-16  FJk  1=2  ~I  I  37EF  -lil'.I-li 

=  1.1  :  IU--I?=  W  **i3 

=  :=:  5:  -)?  >:  u 
-36  CIslS=I  G1u=J-5-:4tI::-I9- 

u:  re;:-  *-=_  P7  _; 

-\  'At  GG3^3  16666;  GGTi 
416 

566  Z=EG;  GOTO  986 

r=66  -I-jLC-R=  F^.  1=6  TO 

1:  3~Er  PiA^  I. J  rT 

h  GG3G3  o4G;         1=3  v  J-; 
GGSuB  648 

Old  flL.ii1  iT£  =  '-:  H ;   vs   0-.C=yD  Q-£  = 

7'_;3  Itc;J  ^"  >2;  GGE_E  c-46 

:   Ht^I  I 

ocd  luLu?F  zhO  iio;;        i-Io  li? 

■i  h\    i?C  =   UubUD  \=4tU   HLih  i~ 
L=j  hi   4\  b4d 

336  tlIN  LJ  F~  J:  6G2;B  G48;  nJH 
I. J  FT  it  2GE.E-  3-6;  :DT  I: 
IGGoE  16666;  GfiTC  -66 

?[..  •.£-•6);  i^E  6^; 

ckF pig     fg<e  24, 

L/2K+1:  MIL  2:  RETURN 


766  1=  kh[-  (3e;t;;j=i*i*5ri¥£bT 

?CfE  6,1:  =G^E  ^  353 
:  d0kF  E4*^/255  -l  =  GrU  3 
:  GGEcE  16666:  GI7G  766 

666  r=5ER=I^"i:-h^=2J;--=4;;=a 

4:  3Ql-^=S;  30:=;:  636^  COlvS- 
IF;  V|_In  55n-3  RT  ^ 

3:6  p=^-F-H/ss  3JlGF=6:  GGF;E 
636:  ¥lIh  5=33  67  .^^=^1;  IF 
£\39  IhtH  &36;X=3;  yLIri  5 ,39 

n;       rLin  nt  c 

Fc6  P=n:H-Oi~6-'166:  LGL3R=iF;  FGFl'F 
336;  :CL0F=9:  -■:>  5,p-£  31 
a;  LJ^Gr^iS:  rL37  .'-c,!t;  "GR 

1=8  TO  J;  NEm  I;  GGSuB  16866 
:  GOTO  3l6 
336  n=L-iU:=a>i5LE=STU 

lF  Hi  ?>I:  iiin  il.u  ft?  a= 
VlIH  Lhi3  riT  RETuRh 

^66        h3j  15:  "3?  V=6  13  3: 
:  FGF      7G  39:  C7l7"=>:  633 
(36-A/-ZM  fiBS  (S8-rrZ>*i5 
;  =l07  ^t;  Nt/7  n.':;  5D3JE 

1088  CHLL  -936 

1618  J=itj  m  33;  CGlG^^F:  ^LIH 
6,39  fiT  3tJ:  v76B  FlnJ/F;  nuu 
2:  TAB       IF  J  fQ  3  TrEh 
-R7hT  j/2»  3G3GE  16666:  GG-C 

teie 

3666  3GlGF=  Rk-  =,:3'-i        6=39  h7 

J?  3GlIF=  Fx-  ,13;:        6  = 

39  RI  h  RETURN 
IdHdn  ir  PEL?,  \_loob4/\ko  inzM 

t  3GkE  -:336b;6:  r'J  i  Sill 

38 


3?  rCr-E  1 3     ;>,F  i4/:FS:  FG^E 
15=34:  F:V3  13 ,2-6:  FGp-I  £7 
=5:  LkE  I3=1?F:  7Gs.E  19=1  = 
FG-.E  26/9:  73KE  2l,2:  FG^.E 
ci,i\  FGKE  23=33 

:6  7E'=7  :  ;^_L  -933;  ?79B  4;  723 
2:  F^>"  sr.  I-GlGF  GE?G2':  FRIhT 
;  F->~  :I  LI-E3  :  FF>."  "2  GR53 
5ttj  PRINT  "3  iEhVlriG" 

4s  rfun=    4  !iiHni:L''x  rmh;    0  ^IK^l 

E1-:  FRlN~  rG  SFiRHt     ;  FRIhT 
7  IE-SEE  =£  r:         "3  2:7>? 

56  FRIST  "9  HtFE^ECLh1 s  Pslh7 
1?  GG.GR  B3R2£:  F?lN"  :  PFI^ 

NEEDS  riisi,  CGH£C"Et- 
:  PRINT 

38  FRIN"  >-:T  ft;  ^F-  "G:  ^  GEK: 
;Z-d:  "INT  =  Ir-r -7  "^M>  GE^G 

5   "=::    IR  :   I"   1*6  FK-  I -.11 

T-EN  II"G  166^: =  GG7G  li 
78  I:-PjT  S^G^  GErG  fCi:L3  G"j  LIKE 
GR  =  Ir  I  ftMD  K26  "-E^ 
GGTI  :eM:  GG^O  36 
188  l=hl  SI-  79:>lt- 1;3?;±  79 
-I-P;  GI2.B  2666:  GG5iiF  16666 
:  GG7G  166 
288        nlG  39:J=I:  GFEGB  2886 
:J=35-Is  GOSuB  266d;  503.B 
18888;  GOTO  288 
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APPLE   II     STARTREN  VERSION 


THIS   IS  A  SHORT   DESCRIPTION  OF  HOW  TO  PLAY  STARTREK  ON  THE 
APPLE  COMPUTER • 

tup  i in TUFRSE   IS   MADE   UP  OP  64   QUADRANTS   IN  AN  8   BY   8  MATRIX ♦ 
CORNER!        YOUR   SPACE   SHIP   STATUS    IS   FOUND   IN  A   TABLE  TO 

AND  DESTf°J-        DISPLAYED  FOR  EACH  QUADRANT   DENOTE J 

NUMBERS  D  lor  LA  T  t.1.    ru  ^  ^  STftRS   JN  JHE  0NES  PLACE 

*  OP  BASES   IN   THE   TENS  PLACE 

#  OF   KLINGONS   IN   THE   HUNDREDS  PLACE 
AT  ANY  TIME   DURING   THE  GAME  t    FOR   INSTANCE   BEFORE  ONE  TOTALLY 

SEWS  SSKMMOT*" 

AGAIN. 


A   "0"    (ZERO)   AND  RETURN. 

REGENERATE 
PHASERS 
GALAXY  RECORD 
PROBE 
10. DAMAGE  REPORT 


lI^THE^ COMMANDS  CAN  BE  OBTAINED  BY  TYPING 

THEY  ARE;  - 

1.  PROPULSION  2. 

3.  LONG  RANGE  SENSORS  4. 

5.  PHOTON  TORPEDOES  6< 

7.  COMPUTER  8. 

9.  SHIELD  ENERGY 

BETWEEN  QUADRANTS  AND  AN   -I"    IF  ONE  WANTS  ONLY 
JSSESi  OR^WARP^ FACTOR*"  I S  THE  NUMBER  OF  SPACES  OR 

SaSSS-I!  J3SpSSSERRrAi!SBMi!iLDESRl™  for  the 

THE   GALAXY   IS  WRAP-AROUND   IN  ALL  DIRECTIONS. 
FIRES  PHASERS  AT  THE  EXPENSE  OF  AVAILABLE  ENERGY. 


TU  4 


F.  6, 


INITIATES  A  SET  OF  QUESTIONS  FOR  TORPEDO  FIRING. 
THEY  CAN  BE  FIRED  AUTOMATICALLY   IF   THEY  HAVE 
irrw  i  nrKFIt  ON  TARGET  WHILE   IN  THE  COMPUTER 
MODE  *   OR  MAY  BE  F IRE B  MANUALLY   IF  THE  TRAGECTORY  ANGLE 

8  ANDK1VWALL  GIVE   INFORMATION  ABOUT  THE  STATUS  OF  THE* SHIP 
AND   ITS  ENVIRONMENT. 
G     9  SETS  THE  SHIELD  ENERGY/AVAILABLE  ENERGY  RATIO. 
S*    11    acrc  FDR   INFORMATION  ON  LOADING   AND  UNLOADING  OF 
H#  PHflTON  TORPEDOES  AT  THE  ESPENSE  OF  AVAILABLE  ENERGY. 

PHOTON  T^^^w^TSH0ULri  BE  A  SIGNED  NUMBER.   FOR  EXAMPLE 

I     7  ENTERS  A  COMPUTER  WHICH  WILL   RESPOND  TO  THE  FOLLOWING 
INSTRUCTIONS:^  cQuRSE 

V  tS«  COURSE  T0RPED0ES5.    COMPUTE  TRE JECTORY 

V  STATUS  7.   RETURN  TO  COMAND  MODE 
IN  THE  FIRST  FIVE  ONE  WILL  HAVE  TO  GIVE  COORDINATES. 
COORDINATES  ARE  GIVEN  IN  MATHMATICAL  NOTATION  WITH 

THE  EXCEPTION  THAT  THE   -V   VALUE   IS  GIVEN  FIRST, 
AN  EXAMPLE  WOULD  BE  'YtX" 

COURSE  OR  trajectory: 

0 


270- 


180 


THIS  EXPLANATION  WAS     WRITTEN  BY  ELWOOD 
NOT  RESPONSIBLE  FOR 
ERRORS 
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LOADING  THE  HI-RES  DEMO  TAPE 


PROCEDURE 


n?  tL  l nT *??  '  tUrC  the  AC  power  switch  1n  the  back 
Apple, 11  °2'    You  should  see  a  random  matrix  of 
quest  on  marks  and  other  text  characters.    If  you  don't 

cSes       °perat0r's  manual  for  s^tem  checkout  pro- 
2'    51*  ^  ?5SET  key'    0n  the  left  hand  side  of  the  screen 

r^r  and  a  f,ashi"g  — 

4.    Type  in  "C00.FFFR"  on  the  Apple  II  keyboard.    This  is  the 
lss  ™f  of  the  high  resolution  machine  language  sub- 
program.   It  extends  from  $C00  to  $FFF.    The  R  tellsthp 
computer  to  read  in  the  data.    Do  not  depress  the  "RETURN" 

"SRNt»ekeaPe  ^°nfJ'n  Playb9Ck  mode  and  dePress 
kuukn    key.    The  flashing  cursor  disappears. 

^Tnp^h!!1'!1  S0Und  a!ter  the  Pr°9ram  has  been  read  in. 
STOP  the  tape  recorder.    Do  not  rewind  the  program  tape  yet. 

7.  Hold  down  the  "CTRL"  key,  depress  and  release  the  B  kev 

JS^STS"  the  "-EIURN"  key  and  release  CTRL"  key. 
You  should  see  a  right  facing  arrow  and  a  flashing  cursor 

Ihf  Ln0mmand  .Places  the  ApP]e  1nt0  BASIC  initializing 
the  memory  pointers.  y 

8.  Type 


5. 
6. 


Type  in  "LOAD",  restart  the  tape  recorder  in  niavhari,  mnA* 
and  hit  the  "RETURN"  key.   TheP?lasS?ng  cur  o?  $sappe™s 

9.   A  beep  will  sound  to  Indicate  the  program  1s  being  loaded. 
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A  second  beep  will  sound,  and  the  right  facing  arrow 
will  reappear  with  the  flashing  cursor.    STOP  the 
tape  recorder.    Rewind  the  tape. 

Type  in  "HIMEM:8192"  and  hit  the  "RETURN"  key.  This 
sets  up  memory  for  high  resolution  graphics. 

Type  in  "RUN"  and  hit  the  "RETURN"  key.    The  screen 
should  clear  and  momentarily  a  HI-RES  demo  menu  table 
should  appear.    The  loading  sequence  is  now  completed. 

SUMMARY  OF  HI -RES  DEMO  TAPE  LOADING 


1 .  RESET 

2.  Type  in  C00.FFFR 

3.  Start  tape  recorder,  hit  RETURN 

4  Asterick  or  flashing  cursor  reappear 
Bc  (CTRL  B)  into  BASIC 

5.  Type  in  "LOAD",  hit  RETURN 

6.  BASIC  prompt  (7)  and  flashing  cursor 
reappear.  Type  in  "HIMEN:8192" ,  hit 
RETURN 

7.  Type  in  "RUN",  hit  RETURN 

8.  STOP  tape  recorder,  rewind  tape. 
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APPLE  II  INTEGER  BASIC 


1.  BASIC  Commands 

2.  BASIC  Operators 

3.  BASIC  Functions 

4.  BASIC  Statements 

5.  Special  Control  and  Editing 

6.  Table  A  —  Graphics  Colors 

7.  Special  Controls  and  Features 

8.  BASIC  Error  Messages 

9.  Simplified  Memory  Map 

10.  Data  Read/Save  Subroutines 

11.  Simple  Tone  Subroutines 

12.  High  Resolution  Graphics 

13.  Additional  BASIC  Program  Examples 


BASIC  COMMANDS 


Commands  are  executed  immediately;  they  do  not  require  line  numbers. Most  Statements 
(see  Basic  Statements  Section)  may  also  be  used  as  commands.    Remember  to  press 
Return  key  after  each  command  so  that  Apple  knows  that  you  have  finished  that 
line.    Multiple  commands  (as  opposed  to  statements)  on  same  line  separated  by 
a  "  :  "  are  NOT  allowed. 


COMMAND  NAME 
AUTO  num 


AUTO    numl3  num2 


Sets  automatic  line  numbering  mode.    Starts  at  line 
number  nw?  and  increments  line  numbers  by  10.  To 
exit  AUTO  mode,  type  a  control  X*,  then  type  the 
letters  "MAN"  and  press  the  return  key. 

Same  as  above  execpt  increments  line  numbers  by 
number  nwn2. 


CLR 


CON 


DEL  numl 


Clears  current  BASIC  variables;  undimensions  arrays. 
Program  is  unchanged. 

Continues  program  execution  after  a  stop  from  a 
control  C*.    Does  not  change  variables. 

Deletes  line  number  numl. 


DEL  numl3  num2 
DSP  var 


HI MEM: 


expr 


GOTO  expr 


GR 


Deletes  program  from  line  number naml  through  line 
number  num2. 

Sets  debug  mode  that  will  display  variable  var  every- 
time  that  it  is  changed  along  with  the  line  number 
that  caused  the  change.    (NOTE:  RUN  command  clears 
DSP  mode  so  that  DSP  command  is  effective  only  if 
program  is  continued  by  a  CON  or  GOTO  command.) 

Sets  highest  memory  location  for  use  by  BASIC  at 
location  specified  by  expression  ex^rin  decimal . 
HIMEM:    may  not  be  increased  without  destroying  program. 
HIMEM:    is  automatically  set  at  maximum  RAM  memory  when 
BASIC  is  entered  by  a  control  B*. 

Causes  immediate  jump  to  line  number  specified  by 
expression  expv. 

Sets  mixed  color  graphics  display  mode.    Clears  screen 
to  black.    Resets  scrolling  window.    Displays  40x40 
squares  in  15  colors  on  top  of  screen  and  4  lines  of  text 
at  bottom. 


LIST 

LIST  numl 

LIST    numl3  nwi2 


Lists  entire  program  on  screen. 
Lists  program  line  number  numl. 

Lists  program  line  number  numl  through  line  number 

num2. 
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Reads  (Loads)  a  BASIC  program  from  cassette  tape* 
Start  tape  recorder  before  hitting  return  key.  Two 
beeps  and  a  " >  "  indicate  a  good  load.    "ERR"  or  "MEM" 
FULL  ERR"  message  indicates  a  bad    tape  or  poor  recorder 
performance- 
Similar  to  HIMEM:    except  sets  lowest  memory  location 
available  to  BASIC.    Automatically  set  at  2048  when 
BASIC  is  entered  with  a  control  B*.    Moving  LOMEM: 
destroys  current  variable  values. 

Clears  AUTO  line  numbering  mode  to  all  manual  line 
numbering  after  a  control  C*  or  control  X*. 

Clears  (Scratches)  current  BASIC  program. 

Clears  DSP  mode  for  variable var. 

Clears  TRACE  mode. 

Clears  variables  to  zero,  undimensions  all  arrays  and 
executes  program  starting  at  lowest  statement  line 
number. 

Clears  variables  and  executes  program  starting  at  line 
number  specified  by  expression  expr. 

Stores  (saves)  a  BASIC  program  on  a  cassette  tape. 
Start  tape  recorder  in  record  mode  prior  to  hitting 
return  key. 

Sets  all  text  mode.    Screen  is  formated  to  display 
alpha-numeric  characters  on  24  lines  of  40  characters 
each.    TEXT  resets  scrolling  window  to  maximum. 

Sets  debug  mode  that  displays  line  number  of  each 
statement  as  it  is  executed. 


Control  characters  such  as  control  X  or  control  C  are 
typed  by  holding  down  the  CTRL  key  while  typing  the, 
specified  letter.    This  is  similiar  to  how  one  holds 
down  the  shift  key  to  type  capital  letters.  Control 
characters  are  NOT  displayed  on  the  screen  but  are 
accepted  by  the  computer.    For  example,  type  several 
control  G's.    We  will  also  use  a  superscript  C  to  indicate 
a  control  character  as  in  Xc. 
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BASIC  Operators 


Symbol         Sample  Statement 
Prefix  Operators 
(  )  10  X=  4*(5  +  X) 

+  20  X=  1+4*5 

30  ALPHA  = 
-(BETA  +2) 

NOT  40  IF  A  NOT  B  THEN 

200 


Explanation 

Expressions  within  parenthesis  (  ) 
are  always  evaluated  first. 

Optional;  +1  times  following  expression. 

Negation  of  following  expression. 


Logical  Negation  of  following  expression; 
0  if  expression  is  true  (non-zero),  1 
if  expression  is  false  (zero). 


Arithmetic  Operators 
+  66    Y  =  X+3 


70  LET  D0TS=A*B*N2 


/  8J0  PRINT  GAMMA/S 

MOD  9J0  X  =  12  MOD  7 

100  X  =  X  M0D(Y+2) 

+  110  P  =  L  +  G 

120  XY4  =  H-D 

130  HEIGHT=15 

140  LET  SIZE=7*5 

150  A(8)  =  2 

155  ALPHAS  =  "PLEASE1 


Exponentiate  as  in  V 
shifted  letter  N. 


NOTE: 


+  is 


Multiplication.    NOTE:    Implied  multi- 
plication such  as  (2  +  3) (4)  is  not 
allowed  thus  N2  in  example  is  a  variable 
not  N  *  2. 

Divide 

Modulo:    Remainder  after  division  of 
first  expression  by  second  expression. 

Add 

Substract 

Assignment  operator;  assigns  a  value  to 
a  variable.    LET  is  optional 
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Relational  and  Logical  Operators 

The  numeric  values  used  in  logical  evaluation  are  "true"  if  non-zero, 
"false"  if  zero. 


Symbol 


Sample  Statement 


Explanation 


160    IF     D  =  E 
THEN  500 


Expression  "equals"  expression, 


#  or  <  > 

# 


>= 
<= 

AND 

OR 


170     IF     A$(l,l)  = 
"Y"  THEN  500 

180     IF     ALPHA  #X*Y 
THEN  5(3)3 

190     IF     A$  #  "NO" 
THEN  500 


200     IF  A>B 
THEN  GO  TO  50 

210     IF  A+l<B-5 
THEN  100 

220     IF  A>=B 
THEN  100 

230     IF  A+l<=B-6 
THEN  200 

240     IF     A>B  AND 
C<D  THEN  200 

250     IF     ALPHA  OR 
BETA+1  THEN  200 


String  variable  "equals"  string  variable. 


Expression  "does  not  equal"  expression. 


String  variable  "does  not  equal"  string 
variable.    NOTE:    If  strings  are  not 
the  same  length,  they  are  considered 
un-equal.    <  >  not  allowed  with  strings. 

Expression  "is  greater  than"  expression. 


Expression  "is  less  than"  expression. 

Expression  "is  greater  than  or  equal  to" 
expression. 

Expression  "is  less  than  or  equal  to" 
expression. 

Expression  1  "and"  expression  2  must 
both  be  "true"  for  statements  to  be  true. 

If  either  expression  1  or  expression  2 
is  "true",  statement  is  "true". 
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BASIC  FUNCTIONS 


Functions  return  a  numeric  result.    They  may  be  used  as  expressions  or  as  part 
of  expressions.    PRINT  is  used  for  examples  only,  other  statements  may 
be  used.    Expressions  following  function  name  must  be  enclosed  between  two 
parenthesis  signs. 
FUNCTION  NAME 


ABS  (expr) 
ASC  (etr$) 


300  PRINT  ABS(X) 


Gives  absolute  value  of  the  expression  expr. 


31CX  PRINT  ASC( "BACK" )  Gives  decimal  ASCII  value  of  designated 
320  PRINT  ASC(B$)  string  variable  str$  .    If  more  than  one 

330  PRINT  ASC(B$(4,4))  character  is  in  designated  string  or 
335  PRINT  ASC(B$(Y))     sub-string,  it  gives  decimal  ASCII 

value  of  first  character. 


LEN  (str$)        340  PRINT  LEN(B$) 


PDL  (expr)        350  PRINT  PDL(X) 


PEEK  (expr)      360  PRINT  PEEK(X) 


RND  (expr)        370  PRINT  RND(X) 


Gives  current  length  of  designated 
string  variable  str$\i.e.9  number  of 
characters. 

Gives  number  between  0  and  255  corres- 
ponding to  paddle  position  on  game  paddle 
number  designated  by  expression  expr  and  must 
be  legal  paddle  (0,1, 2, or  3)  or  else  255  is 
returned. 

Gives  the  decimal  value  of  number  stored 
of  decimal  memory  location  specified  by 
expression  expr  .    For  MEMORY  locations 
above  32676,  use  negative  number;  i.e., 
HEX  location  FFF0  is  -16 

Gives  random  number  between  0  and 
(expression  expr  -1)  if  expression  expr 
is  positive;  if  minus,  it  gives  random 
number  between  0  and  (expression^*  +1). 


SCRH (exprl,      380  PRINT  SCRN  (XI, Yl)  Gives  color  (number  between  0  and  15)  of 
expr 2)  screen  at  horizontal  location  designated 

by  expression  exprl    and  vertical 
location  designated  by  expression  expr2 
Range  of  expression  exprl  is  0  to  39.  Range 
of  expression  expr 2    is  0  to. 39  if  in  standard 
mixed  colorgraphics  display  mode  as  set  by 
GR  command  or  jb  to  47  if  in  all  color  mode 
set  by  POKE  -163J04  ,J0:  POKE  -  163Q2,<7. 


SGN  (expr)       39p  PRINT  SGN(X) 


Jlives  siqn  (not  sine)  of  expression  expr 
i.e.,  -1    if  expression  expr  is  negative, zero  if 
zero  and   +1    if expr  is  positive. 


/ 
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BASIC  STATEMENTS 


Each  BASIC  statement  must  have  a  line  number  between  p  and  32767.  Variable 
names  must  start  with  an  alpha  character  and  may  be  any  number  of  alpha- 
numeric characters  up  to  10J8.     Variable  names  may  not  contain  buried  any 
of  the  following  words:  AND,  AT,  MOD,  OR,  STEP,  or  THEN.    Variable  names  may 
not  begin  with  the  letters  END,  LET,  or  REM.    String  variables  names  must  end 
with  a  $  (dollar  sign).    Multiple  statements  may  appear  under  the  same  line  number 
if  separated  by  a  :  (colon)  as  long  as  the  total  number  of  characters  in  the  line 
(including  spaces)  is  less  than  approximately  150  characters 
Most  statements  may  also  be  used  as  commands.    BASIC  statements  are  executed 
by  RUN  or  GOTO  commands. 


NAME 


CALL  expr 


10  CALL-936 


C0L0R=eapr 


30  C0L0R=12 


DIM  varl  (exprl) 
str$  (expr2) 
var  2  (expr 3) 


DSP 


var 


50  DIM  A(20),B(10) 

60  DIM  B$(30) 

70  DIM  C  U) 
Illeqal: 

80  DIM  A(30) 
Leqal : 

85  DIM  C(1000) 


Leqal : 

90  DSP  AX:  DSP  L 
Illeqal: 

100  DSP  AX,B 

102  DSP  AB$ 

104  DSP  A(5) 
Legal : 

105  A=A(5):  DSP  A 


Causes   execution  of  a  machine  level 
language  subroutine  at  decimal  memory 
location  specified  by  expression  expr 
Locations  above  32767  are  specified  using 
negative  numbers;  i.e.,  location  in 
example  10  is  hexidecimal  number  $FC53 

In  standard  resolution  color  (GR) 
graphics  mode,  this  command  sets  screen 
TV  color  to  value  in  expression  expr 
in  the  range  0  to  15  as  described  in 
Table  A.    Actually  express ion  expr  may  be 
in  the  range  0  to  255  without  error  message 
since  it  is  implemented  as  if  it  were 
expression  expr  MOD  16. 

The  DIM  statement  causes  APPLE  II  to 
reserve  memory  for  the  specified  variables. 
For  number  arrays     APPLE  reserves 
approximately  2  times  expr  bytes  of  memory 
limited  by  available  memory.    For  string 
arrays  -etr$-  (expr)  must  be  in  the  range  of 
1  to  255.    Last  defined  variable  may  be 
redimensioned  at  any  time;  thus,  example 
in  line  is  illegal  but  85  is  allowed. 

Sets  debug  mode  that  DSP  variable  var  each 
time  it  changes  and  the  line  number  where  the 
change  occured. 
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NAME 


EXAMPLE 


DESCRIPTION 


END 


1119  END 


FOR  var=  110  FOR  L=0  to  39 

exp'sl  J0expr2  120  FOR  X=Y1  TO  Y3 
SJEPexpr3         130  FOR  1=39  TO  1 
150  GOSUB  100  *J2 


GOSUS  expr        140  GOSUB  500 


GOTO  expr 


160  GOTO  200 

170  GOTO  ALPHA+100 


Stops  program  execution.  Sends  carriage 
return  and  ">  "  BASIC  prompt)  to  screen. 

Begins  FOR... NEXT  loop,  initializes 
variable  varto  value  of  expression  exprl 
then  increments  it  by  amount  in  expression 
expr  3  each  time  the  corresponding  "NEXT" 
statement  is  encountered,  until  value  of 
expression  expr2\$  reached.    If  STEP  exprS 
is  omitted,  a  STEP  of  +1  is  assumed.  Negative 
numbers  are  allowed. 

Causes  branch  to  BASIC  subroutine  starting 
at  legal  line  number  specified  by  expression 
expr     Subroutines  may  be  nested  up  to 
16  levels. 

Causes  immediate  jump  to  legal  line 
number  specified  by  expression  expr. 


GR 


180  GR 
190  GR: 


POKE  -16302,0 


Sets  mixed  standard  resolution  color 
graphics  mode.    Initializes  COLOR  =  0 
(Black)  for  top  40x40  of  screen  and  sets 
scrolling  window  to  lines  21  through  24 
by  40  characters  for  four  lines  of  text 
at  bottom  of  screen.    Example  190  sets 
all  color  mode  (40x48  field)  with  no  text 
at  bottom  of  screen. 


HLIN  exprl, 
expr2Meixpr3 


200  HLIN  0,39  AT  20 
210  HLIN  Z,Z+6  AT  I 


In  standard  resolution  color  graphics  mode, 
this  command  draws  a  horizontal  line  of  a 
predefined  color  (set  by  C0L0R=)  starting 
at  horizontal  position  defined  by  expression 
exprl  and  ending  at  position  expr%  at 
vertical  position  defined  by  expression 
exprZ  .exprl  ar\dexpr2  must  be  in  the  range 
of  0  to  39  and  exprl  <  =  expr2     .  exprZ 
be  in  the  range  of  0  to  39  (or  0  to  47  if  not 
in  mixed  mode). 


Note: 


HLIN  0,  19  AT  0  is  a  horizontal  line  at  the  top  of  the  screen 
extending  from  left  corner  to  center  of  screen  and  HLIN  20,39  AT 
39  is  a  horizontal  line  at  the  bottom  of  the  screen  extending  from 
center  to  right  corner. 
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I£_ expression    220  IF  A>  B  THEN 
THEN  statement  PRINT  A 

230  IF  X=0  THEN  C=l 
240  IF  A#10  THEN 

GOSUB  200 
250  IF  A$(l,l)#  "Y" 
THEN  100 

Illegal : 

260  IF  L>  5  THEN  50: 
ELSE  60 

Legal : 

270  IF  L>  5  THEN  50 
GO  TO  60 


INPUT  varl. 
var2,  str$ 


280  INPUT  X,Y,Z(3) 
290  INPUT  "AMT" , 
DLLR 

300  INPUT  "Y  or  N?" ,  A$ 


IN#  expr 


310  IN#  6 
320  IN#  Y+2 
330  IN#  0 


LET 

LIST  numlj 
nwn2 


340  LET  X=5 

350  IF  X  >6  THEN 
LIST  50 


NEXT  varl,    360  NEXT  I 
var2  370  NEXT  J,K 


NO  DSP  var  380  NO  DSP  I 
NO  TRACE       390  NO  TRACE 


If  expression  is  true  (non-zero)  then 

execute  statement;      if  false  do  not 

execute  statement.        If  statement 

is  an  expression,  then  a  GOTO  expr 

type  of  statement  is  assumed  to  be  implied. 

The  "ELSE"  in  example  260  is  illegal  but 

may  be  implemented  as  shown  in  example  270. 


Enters  data  into  memory  from  I/O 
device.    If  number  input  is  expected, 
APPLE  wil  output  "?";  if  string  inDut  is 
expected  no  "?"  will  be  outputed.  Multiple 
numeric  inputs  to  same  statement  may  be 
separated  by  a  comma  or  a  carriage  return. 
String  inputs  must  be  separated  by  a 
carriage   return  only.  One  pair  of  "  "  may 
be  used  immediately  after  INPUT  to  output 
prompting  text  enclosed  within  the  quotation 
marks  to  the  screen. 

Transfers  source  of  data  for  subsequent 
INPUT  statements  to  peripheral  I/O  slot 
(1-7)  as  specified  as  by  expression  expr. 
Slot  0  is  not  addressable  from  BASIC. 
IN#0  (Example  330)  is  used  to  return  data 
source  from  peripheral  I/O  to  keyboard 
connector. 

Assignment  operator.    "LET"  is  optional 

Causes  program  from  line  number  rami 
through  line  numberra<m2  to  be  displayed 
on  screen. 

Increments  corresponding  "FOR"  variable 
and  loops  back  to  statement  following 
"FOR"  until  variable  exceeds  limit. 

Turns-off  DSP  debug  mode  for  variable 
Turns-off  TRACE  debug  mode 
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PLOT    exprl  j   expr  2 


POKE  exprlj  expr  2 


POP 


PRINT  varl>  var,  str$ 


400  PLOT  15,  25 
400  PLT  XV, YV 


420  POKE  20,  40 
430  POKE  7*256, 
XM0D255 


440  POP 


450  PRINT  LI 

460  PRINT  LI,  X2 

470  PRINT  "AMT=";DX 

480  PRINT  A$;B$; 

490  PRINT 

492  PRINT  "HELLO" 

494  PRINT  2+3 


In  standard  resolution  color 
graphics,  this  command  plots  a  small 
square  of  a  predefined  color  (set 
by  C0L0R=)  at  horizontal  location 
specified  by  expression  exprl  in 
range  0  to  39  and  vertical  location 
specified  by  expression expr2   in  range 
0  to  39  (or  0  to  47  if  in  all  graphics 
mode)  NOTE:    PLOT  0  0  is  upper  left 
and  PLOT  39,  39  (or  PLOT  39,  47)  is 
lower  right  corner. 

Stores  decimal  number  defined  by 
expression  expv2    in  range  of  0 
255  at  decimal  memory  location 
specified  by  expression  exprl 
Locations  above  32767  are  specified 
by  negative  numbers. 

"POPS"  nested  GOSUB  return  stack 
address  by  one. 

Outputs  data  specified  by  variable 
var  or  string  variable  str$  starting 
at  current  cursor  location.    If  there 
is  not  trailing  ","  or  ";"  (Ex  450) 
a  carriage  return  will  be  generated. 

Commas  (Ex.  460)  outputs  data  in  5 
left  justified  columns.  Semi-colon 
(Ex.  470)  inhibits  print  of  any  spaces. 
Text  imbedded  in  "  "  will  be  printed 
and  may  appear  multiple  times. 


REM 


expr 


RETURN 


500  PR#  7 


510  REM  REMARK 


520  RETURN 
530  IFX=  5  THEN 
RETURN 


Like  IN#,  transfers  output  to  I/O 
slot  defined  by  expression  expr  PR# 
0  is  video  output  not  I/O  slot  0. 

No  action.    All  characters  after  REM 
are  treated  as  a  remark  until  terminated 
by  a  carriage  return. 

Causes  branch  to  statement  following 
last  GOSUB;  i.e.,  RETURN  ends  a 
subroutine.    Do  not  confuse  "RETURN" 
statement  with  Return  ke^_  on  keyboard. 
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530  TAB  24 
540  TAB  1+24 
550  IF  A#B  THEN 
TAB  20 


550  TEXT 
560  TEXT: 


CALL-936 


570  TRACE 
580  IFN>  32000 
THEN  TRACE 

590  VLIN  0,  39AT15 
600  VLIN  Z.Z+6ATY 


610  VTAB  18 
620  VTAB  1+2 


Moves  cursor  to  absolute  horizontal 
position  specified  by  expression 
expr  in  the  range  of  1  to  40.  Position 
is  left  to  right 

Sets  all  text  mode.  Resets 
scrolling  window  to  24  lines  by  40 
characters.    Example  560  also  clears 
screen  and  homes  cursor  to  upper  left 
corner 

Sets  debug  mode  that  displays  each 
line  number  as  it  is  executed. 


Similar  to  HLIN  except  draws  vertical 
line  starting  at  exprl  and  ending  at 
expr2  at  horizontal  position  expr3. 

Similar  to  TAB.    Moves  cursor  to 
absolute  vertical  position  specified 
by  expression  expr  in  the  range  1  to 
24.    VTAB  1  is  top  line  on  screen; 
VTAB24  is  bottom. 
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SPECIAL  CONTROL  AND  EDITING  CHARACTERS 


"Control"  characters  are  indicated  by  a  super-scripted  "C"  such  as  G  .  They 
are  obtained  by  holding  down  the  CTRL  key  while  typing  the  specified  letter. 
Control  characters  are  NOT  disolaved  on  the  TV  screen.    B    and  C   must  be 
followed  by  a  carriage  return.    Screen  editing  characters  are  indicated  by  a 
sub-scripted  "E"  such  as  Dr.    They  are  obtained  by  pressing  and  releasing  the 
ESC  key  then  typing  specified  letter.    Edit  characters  send  information  only 
to  display  screen  and  does  not  send  data  to  memory.    For  example,  Uc  moves  to 
cursor  to  right  and  copies  text  while  Ae  moves  cursor  to  right  but  does  not 
copy  text. 

CHARACTER  DESCRIPTION  OF  ACTION 


RESET  key 


Control  B 


Control  C 


Control  G 
Control  H 


Control  J 
Control  V 

Control  X 


Immediately  interrupts  any  program  execution  and  resets 
computer.    Also  sets  all  text  mode  with  scrolling  window 
at  maximum.    Control  is  transfered  to  System  Monitor  and 
Apple  prompts  with  a  "*"  (asterisk)  and  a  bell.  Hitting 
RESET  key  does  NOT  destroy  existing  BASIC  or  machine 
language  program. 

If  in  System  Monitor  (as  indicated  by  a  "*"),  a  control 
B  and  a  carriage  return  will  transfer  control  to  BASIC, 
scratching  (killing)  any  existing  BASIC  program  and  set 
HIMEM:  to  maximum  installed  user  memory  and  LOMEM: 
to  2048. 

If  in  BASIC,  halts  program  and  displays  line  number 
where  stop  occurred*.    Program  may  be  continued    with  a 
CON  command.    If  in  System  Monitor,  (as  indicated  by  "*"), 
control  C  and  a  carraige  return  will  enter  BASIC  without 
killing  current  program. 

Sounds  bell  (beeps  speaker) 

Backspaces  cursor  and  deletes  any  overwritten  characters 
from  computer  but  not  from  screen.    Apply  supplied 
keyboards  have  special  key        on  right  side  of  keyboard 
that  provides  this  functions  without  using  control  button. 

Issues  line  feed  only 

r 

Compliment  to  H  .    Forward  spaces  cursor  and  copies  over 
written  characters.    Apple  keyboards  have        key  on 
right  side  which  also  performs  this  function. 

Immediately  deletes  current  line. 

If  BASIC  program  is  expecting  keyboard  input,  you  will  have 
to  hit  carriage  return  key  after  typing  control  C. 
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CHARACTER  DESCRIPTION  OF  ACTION 

A£  Move  cursor  to  right 

Move  cursor  to  left 
C£  Move  cursor  down 

Move  cursor  up 

EE  Clear  text  from  cursor  to  end  of  line 

F£  Clear  text  from  cursor  to  end  of  page 

@E  Home  cursor  to  top  of  page,  clear  text  to  end 

of  page. 


Table  A:    APPLE  II  COLORS  AS  SET  BY  COLOR 


Note:        Colors  may  vary  depending  on  TV  tint  (hue)  setting  and  may  also 

be  changed  by  adjusting  trimmer  capacitor  C3  on  APPLE  II  P.C.  Board. 


0  =  Black 

1  -  Magenta 

2  =  Dark  Blue 

3  =  Light  Purple 

4  =  Dark  Green 

5  =  Grey 

6  =  Medium  Blue 

7  =  Light  Blue 


8 
9 

10 
11 
12 
13 
14 
15 


Brown 

Orange 

Grey 

Pink 

Green 

Yellow 

Blue/Green 

White 
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Special  Controls  and  Features 


Hex 

BASIC  Example 

Description 

Display  Mode  Controls 

C05O 

C051 
C052 

CJflb  o 
C054 

C055 
C056 
C057 

10 

30 
40 
50 

60 
70 
80 

POKE  -16304,0 

rUI\t  -  i  vopo  , jy 

POKE  -16302,0 
POKE  -16301,0 
POKE  -16300,0 

POKE  -16299,0 
POKE  -16298,0 
POKE  -16297,0 

Set  color  graphics  mode 

Set  text  mode 

Clear  mixed  graphics 

Set  mixed  graphics  (4  lines  text) 

Clear  display  Page  2  (BASIC  commands 

use  Page  1  only) 
<ia+  riicniav  to  Paae  2  (alternate) 
Clear  HIRES  graphics  mode 
<Zc*t  HTRF^  nraohics  mode 

TEXT  Mode 

Controls 

0020 

90  POKE  32, LI 

Set  left  side  of  scrolling  window 
to  location  specified  by  LI  in 
range  of  0  to  39. 

0021 

100 

POKE  33, Wl 

Set  window  width  to  amount  specified 
by  Wl.    L1+W1<40.  W1>0 

0022 

110 

POKE  34, Tl 

Set  window  top  to    line  specified 
by  Tl  in  range  of  0  to  23 

0023 

120 

POKE  35, Bl 

Set  window  bottom  to    line  specified 
by  Bl  in  the  range  of  0  to  23.  B1>T1 

0024 

130 
140 
150 

CH=PEEK(36) 
POKE  36, CH 
TAB(CH+1) 

Read/set  cusor  horizontal  position 
in  the  range  of  0  to  39.    If  using 
TAB,  you  must  add  "1"  to  cusor  position 
read  value;  Ex.  140  and  150  perform 
identical  function. 

0025 

160 
170 
180 

CV=PEEK(37) 
POKE  37, CV 
VTAB(CV+1) 

Similar  to  above.    Read/set  cusor 
vertical  position  in  the  range  0  to 
23. 

0032 

190 
200 

POKE  50,127 
POKE  50,255 

Set  inverse  flag  if  127  (Ex.  190) 
Set  normal  flag  if    255(Ex.  200) 

FC58 

210 

CALL  -936 

(@E)  Home  cusor,  clear  screen 

FC42 

220 

CALL  -958 

(Fe)  Clear  from  cusor  to  end  of  page 
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Hex  BASIC  Example  Description 

FC9C  230  CALL  -868  (ee)  clear  from  cusor  tQ  ^  ^  ^ 

FC66  240  CALL  -922  (JC,  Ljne  feed 

FC70  250  CALL  -912  Scr0„  up  text  one  , 


Miscellaneous 


C030 

360  X=PEEK(-16336) 
365  POKE  -16336,0 

Toggle  speaker 

C000 

370  X=PEEK(-16384) 

Read  keyboard;  if  X>127  then  key  was 
pressed. 

C010 

380  POKE  -16368,0 

Clear  keyboard  strobe  -  alwavs  after 
reading  keyboard. 

L061 

390  X=PEEK(16287) 

Read  PDL(0)  push  button  switch.  If 
X>127  then  switch  is  "on". 

C062 

400  X=PEEK(-16286) 

Read  PDL(l)  push  button  switrh 

C063 

410  X=PEEK(-16285) 

Read  PDL 1 2)  nu<:h  hn-f-tnn  ciw-i-f-^k 

C058 

420  POKE  -16296,0 

Clear  Game  I/O  AN0  output 

C059 

430  POKE  -16295,0 

Set  Game  I/O  AN0  output 

C05A 

440  POKE  -16294,0 

Clear  Game  I/O  AN1  output 

C05B 

450  POKE  -16293,0 

Set  Game  I/O  AMI  output 

C05C 

460  POKE  -16292,0 

Clear  Game  I/O  AN2  output 

C05D 

470  POKE  -16291,0 

Set  Game  I/O  AN2  output 

C05E 

480  POKE  -16290,0 

Clear  Game  I/O  AN3  output 

C05F 

490  POKE  -16289,0 

Set  Game  I/O  AN3  output 

31 


APPLE  II  BASIC  ERROR  MESSAGES 


***  SYNTAX  ERR 
***  >  32767  ERR 

***  >  255  ERR 

***  BAD  BRANCH  ERR 

***  BAD  RETURN  ERR 

***  BAD  NEXT  ERR 

***  16  GOSUBS  ERR 
***  16  FORS  ERR 
***  NO  END  ERR 
***  MEM  FULL  ERR 

***  TOO  LONG  ERR 

***  DIM  ERR 


Results  from  a  syntactic  or  typing  error. 

A  value  entered  or  calculated  was  less  than 
-32767  or  greater  than  32767. 

A  value  restricted  to  the  range  0  to  255  was 
outside  that  range. 

Results  from  an  attempt  to  branch  to  a  non- 
existant  line  number. 

Results  from  an  attempt  to  execute  more  RETURNS 
than  previously  executed  GOSUBs. 

Results  from  an  attempt  to  execute  a  NEXT  state- 
ment for  which  there  was  not  a  corresponding 
FOR  statement. 

Results  from  more  than  16  nested  GOSUBs. 

Results  from  more  than  16  nested  FOR  loops. 

The  last  statement  executed  was  not  an  END. 

The  memory  needed  for  the  program  has  exceeded 
the  memory  size  allotted. 

Results  from  more  than  12  nested  parentheses  or 
more  than  128  characters  in  input  line. 

Results  from  an  attempt  to  DIMension  a  string 
array  which  has  been  previously  dimensioned. 


***  RANGE  ERR 


***  STR  OVFL  ERR 
***  STRING  ERR 
RETYPE  LINE 


An  array  was  larger  than  the  DIMensioned 
value  or  smaller  than  1  or  HLIN.VLIN, 
PLOT,  TAB,  or  VTAB  arguments  are  out  of 
range. 

The  number  of  characters  assigned  to  a  string 
exceeded  the  DIMensioned  value  for  that  string. 

Results  from  an  attempt  to  execute  an  illegal 
string  operation. 

Results  from  illegal  data  being  typed  in  response 
to  an  INPUT  statement.    This  message  also  requests 
that  the  illegal  item  be  retyped. 
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Simplified  Memory  Map 


FFFF 


E000 


0000 
C000 


XX 


7FF 
400 
0 


64K 


56K 


Monitor  and  BASIC  Routines  in  ROM 


Future  enhancement  or  user  supplied 
PROMS 


52K 
48K 


Peripheral  I/O 


(HIMEM: ) 


  »  User  specified  RAM  memory  size 


User  Workspace 


(LOMEM: ) 
2K   


IK. 
Q  ■ 


Screen  Memory 
Internal  Workspace 
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READ/SAVE  DATA  SUBROUTINE 


INTRODUCTION 

Valuable  data  can  be  generated  on  the  Apple  II  computer  and  sometimes 
it  is  useful  to  have  a  software  routine  that  will  allow  making  a  permanent 
record  of  this  information.    This  paper  discusses  a  simple  subroutine  that 

serves  this  purpose. 

Before  discussing  the  Read/Save  routines  a  rudimentary  knowledge  of 
how  variables  are  mapped  into  memory  is  needed. 

Numeric  variables  are  mapped  into  memory  with  four  attributes.  Appearing 
in  order  sequentually  are  the  Variable  Name,  the  Display  Byte,  the  Next  Variable 
Address,  and  the  Data  of  the  Variable.    Diagramatically  this  is  represented  as: 

VN  DSP  NVA  DATA (9)  DATA(l)   DATA(N) 

1  h1  h2  hn+l 


VARIABLE  NAME  -  up  to  100  characters 
represented  in  memory  as  ASCII  equi- 
valents with  the  high  order  bit  set. 

DSP  (DISPLAY)  BYTE  -  set  to  01  when 
DSP  set  in  BASIC  initiates  a  process 
that  displays  this  variable  with  the 
line  number  every  time  it  is  changed 
within  a  program. 

NVA  (NEXT  VARIABLE  ADDRESS)  -  two 
bytes  (first  low  order,  the  second 
high  order)  indicating  the  memory 
location  of  the  next  variable. 

DATA  -  hexadecimal  equivalent  of 
numeric  information,  represented 
in  pairs  of  bytes,  low  order  byte 
first. 


\ 
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String  variables  are  formatted  a  bit  differently  than  numeric  ones. 
These  variables  have  one  extra  attribute  -  a  string  terminator  which  desig- 
nates the  end  of  a  string.    A  string  variable  is  formatted  as  follows: 


VN  DSP  NVA  DATA ((7)  DATA(1 ) ,  _    DATA(n)  ST 


hl  h2  hn+1 


VARIABLE  NAME  -  up  to  100  characters 
represented  in  memory  as  ASCII  equi- 
valents with  the  high  order  bit  set. 

DSP  (DISPLAY)  BYTE  -  set  to  01  when 
DSP  set  in  BASIC,  initiates  a  process 
that  displays  this  variable  with  the 
line  number  every  time  it  is  changed 
within  a  program. 

NVA  (NEXT  VARIABLE  ADDRESS)  -  two 
bytes  (first  low  order,  the  second 
high  order)  indicating  the  memory 
location  of  the  next  variable. 

DATA  -  ASCII  equivalents  with  high 
order  bit  set. 

STRING  TERMINATOR  (ST)  -  none  high 
order  bit  set  character  indicating 
END  of  string. 

There  are  two  parts  of  any  BASIC  program  represented  in  memory.    One  is 
the  location  of  the  variables  used  for  the  program,  and  the  other  is  the  actual 
BASIC  program  statements.    As  it  turns  out,  the  mapping  of  these  within  memory 
is  a  straightforward  process.    Program  statements  are  placed  into  memory  starting 
at  the  top  of  RAM  memory*  unless  manually  shifted  by  the  "HIMEM:."  command,  and 
are  pushed  down  as  each  new  (numerically  larger)  line  numbered  statement  is 
entered  into  the  system.    Figure  la  illustrates  this  process  diagramatically. 
Variables  on  the  other  hand  are  mapped  into  memory  starting  at  the  lowest  position 
of  RAM  memory  -  hex  $800  (2048)  unless  manually  shifted  by  the  "LOMEM  : "  command. 
They  are  laid  down  from  there  (see  Figure  lb)  and  continue  until  all  the  variables 
have  been  mapped  into  memory  or  until  they  collide  with  the  program  statements. 
In  the  event  of  the  latter  case  a  memory  full  error  will  be  generated 


*Top  of  RAM  memory  is  a  function  of  the  amount  of  memory.    — - 
16384  will  be  the  value  of  "HIMEM:"  for  a  16K  system. 
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The  computer  keeps  track  of  the  amount  of  memory  used  for  the  variable 
table  and  program  statements.    By  placing  the  end  memory  location  of  each  into 
$CC-CD( 204-205)  and  $CA-CB(203-204) ,  respectively.    These  are  the  BASIC 
memory  program  pointers  and  their  values  can  be  found  by  using  the  statements 
in  Figure  2.    CM  defined  in  Figure  1  as  the  location  of  the  end  of  the  variable 
tape  is  equal  to  the  number  resulting  from  statement  a  of  Figure  2.    PP,  the 
program  pointer,  is  equal  to  the  value  resulting  from  statement  2b.  These 
statements (Figure  2)  can  then  be  used  on  any  Apple  II  computer  to  find  the 
limits  of  the  program  and  variable  table. 

FINDING  THE  VARIABLE  TABLE  FROM  BASIC 

First,  power  up  the  Apple  II,  reset  it,  and  use  the  CTRL  B  (control  B) 
command  to  place  the  system  into  BASIC  initializing  the  memory  pointers.  Using 
the  statements  from  Figure  2  it  is  found  that  for  a  16K  Apple  II  CM  is  equal  to 
2048  and  PP  is  equal  to  16384.    These  also  happen  to  be  the  values  of  LOMEN  and 
HIMEN:    But  this  is  expected  because  upon  using  the  Bc  command  both  memory 
pointers  are  initialized  indicating  no  program  statements  and  no  variables. 

To  illustrate  what  a  variable  table  looks  like  in  Apple  II  memory  suppose 
we  want  to  assign  the  numeric  variable  A  ($C1  is  the  ASCII  equivalent  of  a  with 
the  high  order  bit  set)  the  value  of  -1  (FF  FF  in  hex)  and  then  examine  the 
memory  contents.    The  steps  in  this  process  are  outlined  in  example  I.    Variable  A 
is  defined  as  equal  to  -1  (step  1).    Then  for  convenience  another  variable  -  B  - 
is  defined  as  equal  to  0  (step  2).    Now  that  the  variable  table  has  been  defined 
use  of  statement  2a  indicates  that  CM  is  equal  to  2060  (step  3).    LOMEN  has  not 
been  readjusted  so  it  is  equal  to  2048.    Therefore  the  variable  table  resides  in 
memory  from  2048  ($800  hex)  to  2060  ($80C).    Depressing  the  "RESET"  key  places 
the  Apple  II  into  the  monitor  mode  (step  4). 

We  are  now  ready  to  examine  the  memory  contents  of  the  variable  table. 
Since  the  variable  table  resides  from  $800  hex  to  $80C  hex  typing  in  "800. 80C" 
and  then  depressing  the  "RETURN"  key  (step  5)  will  list  the  memory  contents  of 
this  range.    Figure  3  lists  the  contents  with  each  memory  location  labelled. 
Examining  these  contents  we  see  that  CI  is  equal  to  the  variable  name  and  is  the 
memory  equivalent  of  "A"  and  that  FF  FF  is  the  equivalent  of  -1.    From  this,  since 
the  variable  name  is  at  the  beginning  of  the  table  and  the  data  is  at  the  end,  the 
variable  table  representation  of  A  extends  from  $800  to  $805.    We  have  then  found 
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the  memory  range  of  where  the  variable  A  is  mapped  into  memory.    The  reason  for 
this  will  become  clear  in  the  next  section. 

READ/SAVE  ROUTINE 

The  READ/SAVE  subroutine  has  three  parts.    The  first  section  (lines  0-10) 
defines  variable  A  and  transfers  control  to  the  main  program.    Lines  20  through 
26  represents  the  Write  data  to  tape  routine  and  lines  30-38  represent  the  Read 
data  from  tape  subroutine.    Both  READ  and  SAVE  routines  are  executable  by  the 
BASIC  "GOSUB  X"  (where  X  is  20  for  write  and  30  is  for  read)  command.    And  as 
listed  these  routines  can  be  directly  incorporated  into  almost  any  BASIC  program 
for  read  and  saving  a  variable  table.    The  limitation  of  these  routines  is  that 
the  whole  part  of  a  variable  table  is  processed  so  it  is  necessary  to  maintain 
exactly  the  dimension  statements  for  the  variables  used. 

The  variables  used  in  this  subroutine  are  defined  as  follows: 

A  =        record  length,  must  be  the  first  variable  defined 

CM=        the  value  obtained  from  statement  a  of  figure  2 

LM=        is  equal  to  the  value  of  "LOMEM: " 
Nominally  2048 

SAVING  A  DATA  TABLE 

The  first  step  in  a  hard  copy  routine  is  to  place  the  desired  data  onto 
tape.    This  is  accomplished  by  determining  the  length  of  the  variable  table  and 
setting  A  equal  to  it.    Next  within  the  main  program  when  it  is  time  to  write  the 
data  a  GOSUB20  statement  will  execute  the  write  to  tape  process.    Record  length, 
variable  A,  is  written  to  tape  first  (line  22)  followed  by  the  desired  data 
(line  24).    When  this  process  is  completed  control  is  returned  to  the  main  program. 

READING  A  DATA  TABLE 

The  second  step  is  to  read  the  data  from  tape.    When  it  is  time  a  GOSUB30 
statement  will  initiate  the  read  process.    First,  the  record  length  is  read  in 
and  checked  to  see  if  enough  memory  is  available  (line  32-34).    If  exactly  the 
same  dimension  statements  are  used  it  is  almost  guaranteed  that  there  will  be 
enough  memory  available.    After  this  the  variable  table  is  read  in  (line  34)  and 
control  is  then  returned  to  the  main  program  (line  36).    If  not  enough  memory 
is  available  then  an  error  is  generated  and  control  is  returned  to  the  main  pro- 
gram (line  38) 


37 


EXAMPLE  OF  READ/SAVE  USAGE 

The  Read/Save  routines  may  be  incorporated  directly  into  a  main  program. 
To  illustrate  this  a  test  program  is  listed  in  example  2.    This  program  dimensior 
a  variable  array  of  twenty  by  one,  fills  the  array  with  numbers,  writes  the  data 
table  to  tape,  and  then  reads  the  data  from  tape  listing  the  data  on  the  video 
display.    To  get  a  feeling  for  how  to  use  these  routines  enter  this  program  and 
explore  how  the  Read/Save  routines  work. 

CONCLUSION 

Reading  and  Saving  data  in  the  format  of  a  variable  table  is  a  relatively 
straight  forward  process  with  the  Read/Save  subroutine  listed  in  figure  4.  This 
routine  will  increase  the  flexibility  of  the  Apple  II  by  providing  a  permanent 
record  of  the  data  generated  within  a  program.    This  program  can  be  reprocessed. 
The  Read/Save  routines  are  a  valuable  addition  to  any  data  processing  program. 
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Van 


Var2 


Varr 


Unused 

n 

Memory 

H2 

P3 


Pn-2 


Pn-1 


IlOMEN: 
$800 


/  t 


CM  End  of 
Variable 
Table 


PP  beginning 
of 

Program 


HI  MEM 

Max  System 
Size 


Variable  Data 


BASIC  Program 


Figure  1 


a)  PRINT  PEEK(204)  +  PEEK(205)*256     +  PP 

b)  PRINT  PEEK(2(32)  +  PEEK(203)*256     -  CM 

Figure  2 


800 

801 

802  803 

804  805 

806 

807 

808  809 

CI 

00 

06  08 

FF  FF 

C2 

00 

0C  08 

L  H 

L  H 

L  H 

VAR 

DSP 

NVA 

DATA 

VAR 

DSP 

NVA 

NAM 

1 

 *  

NAM 
1 

T 

00      00  00 
DATA 


Figure  3 

$800. 80C  rewritten  with  labelling 


39 


FIGURE  4b 


READ/SAVE  PROGRAM 


COMMENTS 


0  A=0 


10    GOTO  100 


20    PRINT  "REWIND  TAPE  THEN 
START  TAPE  RECORDER": 
INPUT  "THEN  HIT  RETURN", 
B$ 

22    A=CM-LM:    POKE  60,4: 
POKE  61,8:  POKE  62,5: 
POKE  63,8:  CALL  -307 

24    POKE  60, LM  MOD  256: 
POKE  61,  LM/256: 
POKE  62,  CM  MOD  256: 
POKE  63,  CM/256: 
CALL  -307 

26    PRINT  "DATA  TABLE  SAVED": 
RETURN 

30    PRINT  "REWIND  THE  TAPE 
THEN  START  TAPE  RECORDER" : 
INPUT  "AND  HIT  RETURN", 
B$ 

32  POKE  60,4:  POKE  61,8: 
POKE  62,5:  POKE  63,8: 
CALL  -259 

34    IF  A<0  THEN  38:  P=LM+A: 
IF  P>HM  THEN  38:  CM=P: 
POKE  60,  LM  MOD  256: 
POKE  61,  LM/256:  POKE  62, 
CM  MOD  256:  POKE  63,  CM/256: 
CALL  -259 

36  PRINT  "DATA  READ  IN": 
RETURN 

38    PRINT  "***T00  MUCH  DATA 
BASE***" :  RETURN 


This  must  be  the  first  statement  in  the 
program.    It  is  initially  0,  but  if  data 
is  to  be  saved,  it  will  equal  the  length 
of  the  data  base. 

This  statement  moves  command  to  the  main 
program. 

Lines  20-26  are  the  write  data  to  tape 
subroutine. 


Writing  data  table  to  tape 


Returning  control  to  main  program. 

Lines  30-38  are  the  READ  data  from  tape 
subroutine. 


Checking  the  record  length  (A)  for  memory 
requirements  if  everything  is  satisfactory 
the  data  is  READ  in. 


Returning  control  to  main  program. 


NOTE:    CM,  LM  and  A  must  be  defined  within  the  main  program. 
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1  >A=1 

> 

2  >B=0 

> 

3  >PRINT  PEEK  (204)  +  PEEK 

(205)  *  256 

computer  responds  with= 
2060 

4  > 
* 

5  *800.80C 

Computer  responds  with: 
0800-  CI  00  86  08  FF  FF  C2  00 
0808   0C  08  00  00  00 

Exampl 


Define  variable  A=-l ,  then  hit  RETURN 

Define  variable  B=0,  then  hit  RETURN 

Use  statement  2a  to  find  the  end  of 
the  VARIABLE  TABLE 

Hit  the  RESET  key,  Apple  moves  into 
Monitor  mode. 

Type  in  VARIABLE  TABLE  RANGE  and  HIT 
the  RETURN  KEY. 
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Example  2 


/LIST 
8  fi=8 

18  GOTO  188 

28  Efi  WRITE  DfiTfi  TO  TfiPE  ROUT  I  HE 
23  R=CH-LK;  POKE  68,4:  POKE  61 

,8:  POKE  62,5:  POKE  63,8:  CfiLL 

-387 

84  POKE  681H  HOD  356:  POKE  fa! 
,Lfi/356;  POKE  63.CH  MOD  356 
:  POKE  63,03/356:  CfiLL  -38? 

36  RETURN 

38  REM  REHD  MTfi  SUBROUTINE 

33  POKE  68,4:  POKE  61,8:  POKE 
62,5:  POKE  63,8:  CfiLL  -359 

34  IF  fi<8  THEN  38:f=Ui+fl:  IF  P> 
m  THEN  38:Cfi=F:  POKE  68,LH  MOD 
£56:  POKE  61,Lfl/356:  POKE  6? 
M  m  356:  POKE  63,CR/356 

:  CfiLL  -359 
36  RETURN 

33  PRINT  ****  TOO  SUCH  DfiTfi  BfiSE  ** 

r:  END 
188  Din  fif(i),«36) 
185  FOR  1=1  TO  38:XU)=I:  NEXT 

1 

188  Lfi=3848:C»=3I86;fi=58;HM=16383 


118  PRINT  528  NUMBERS  GENERATED5 

128  PRINT  aNOy  yE  ARE  GOING  TO  SAVE 
THE  DfiTfi5:  PRINT  HUHEH  YOU  HRE  R 
EfiOY  STfiRT  THE  RECORDER  IN  RECOR 
D  NODE5:  INPUT  SBND  HIT  RETURN3 
,Hf 

138  CfiLL  -936:  PRINT  5NOi  WRITING  Dfi 

Tfi  TO  TfiPE2:  GOSUB  38 
135  PRINT  2N0«  THE  DfiTfi  IS  SAVED8 

148  PRINT  sHOy  §E  HRE  GOING  TO  CLEfiR 
THE  XC28)  TABLE  fiHD  READ  THE  Dfi 

Tfi  FROH  TfiPE" 
158  FOR  1=1  TO  28:X<I}=6:  PRINT 

msilfP  5:XCi):  NEXT  1 
168  PRINT  !HOy  STfiRT  TfiPE  RECORDER5 

:  INPUT  5fiHD  THEN  HIT  RETURN5 

.Hi 

165  PRINT  5fi  %H 
178  GOSUB  38 

188  PRINT  m  THE  DfiTfi  READ  IN5 

198  FOR  1=1  TO  38:  PRINT  SX<3:I: 

s)=  S;X(I):  NEXT  I 
195  PRINT  "THIS  IS  THE  END" 
288  END 
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A  SIMPLE  TONE  SUBROUTINE 


INTRODUCTION 

Computers  can  perform  marvelous  feats  of  mathematical  computation 
at  well  beyond  the  speed  capable  of  most  human  minds.    They  are  fast, 
cold  and  accurate;  man  on  the  other  hand  is  slower,  has  emotion,  and  makes 
errors.    These  differences  create  problems  when  the  two  interact  with  one 
another.    So  to  reduce  this  problem  humanizing  of  the  computer  is  needed. 
Humanizing  means  incorporating  within  the  computer  procedures  that  aid  in 
a  program's  usage.    One  such  technique  is  the  addition  of  a  tone  subroutine. 
This  paper  discusses  the  incorporation  and  usage  of  a  tone  subroutine  within 
the  Apple  II  computer. 

Tone  Generation 

To  generate  tones  in  a  computer  three  things  are  needed:    a  speaker, 
a  circuit  to  drive  the  speaker,  and  a  means  of  triggering  the  circuit.    As  it 
happens  the  Apple  II  computer  was  designed  with  a  two-inch  speaker  and  an 
efficient  speaker  driving  circuit.    Control  of  the  speaker  is  accomplished 
through  software. 

Toggling  the  speaker  is  a  simple  process,  a  mere  PEEK  -  16336  ($C03^) 
in  BASIC  statement  will  perform  this  operation.    This  does  not,  however, 
produce  tones,  it  only  emits  clicks.    Generation  of  tones  is  the  goal,  so 
describing  frequency  and  duration  is  needed.    This  is  accomplished  by  toggling 
the  speaker  at  regular  intervals  for  a  fixed  period  of  time.    Figure  1  lists 
a  machine  language  routine  that  satisfies  these  requirements. 

Machine  Language  Program 

This  machine  language  program  resides  in  page  0  of  memory  from  $02  (2) 
to  $14  (20).    $00  (00)  is  used  to  store  the  relative  period  (P)  between 
toggling  of  the  speaker  and  $01  (01)  is  used  as  the  memory  location  for  the 
value  of  relative  duration  (D).    Both  P  and  D  can  range  in  value  from  $00  (0) 
to  $FF  (255).    After  the  values  for  frequency  and  duration  are  placed  into 
memory  a  CALL2  statement  from  BASIC  will  activate  this  routine.    The  speaker 
is  toggled  with  the  machine  language  statement  residing  at  $02  and  then  a 

\ 


43 


delay  in  time  equal  to  the  value  in  $00  occurs.    This  process  is  repeated  until 
the  tone  has  lasted  a  relative  period  of  time  equal  to  the  duration  (value  in  $01) 
and  then  this  program  is  exited  (statement  $14). 

Basic  Program 

The  purpose  of  the  machine  language  routine  is  to  generate  tones  controllable 
from  BASIC  as  the  program  dictates.    Figure  2  lists  the  appropriate  statement  that 
will  deposit  the  machine  language  routine  into  memory.    They  are  in  the  form  of 
a  subroutine  and  can  be  activated  by  a  GOSUB  32000  statement.    It  is  only  necessary 
to  use  this  statement  once  at  the  beginning  of  a  program.    After  that  the  machine 
language  program  will  remain  in  memory  unless  a  later  part  of  the  main  program 
modifies  the  first  20  locations  of  page  0. 

After  the  GOSUB  32000  has  placed  the  machine  language  program  into  memory 
it  may  be  activated  by  the  statement  in  Figure  3.    This  statement  is  also  in  the 
form  of  a  GOSUB  because  it  can  be  used  repetitively  in  a  program.    Once  the  fre- 
quency and  duration  have  been  defined  by  setting  P  and  D  equal  to  a  value  between 
0  and  255  a  GOSUB  25  statement  is  used  to  initiate  the  generation  of  a  tone.  The 
values  of  P  and  D  are  placed  into  $00  and  $01  and  the  CALL2  command  activates  the 
machine  language  program  that  toggles  the  speaker.    After  the  tone  has  ended 
control  is  returned  to  the  main  program. 

The  statements  in  Figures  2  and  3  can  be  directly  incorporated  into  BASIC 
programs  to  provide  for  the  generation  of  tones.    Once  added  to  a  program  an 
infinite  variety  of  tone  combinations  can  be  produced.    For  example,  tones  can 
be  used  to  prompt,  indicate  an  error  in  entering  or  answering  questions,  and 
supplement  video  displays  on  the  Apple  II  computer  system. 

Since  the  computer  operates  at  a  faster  rate  than  man  does,  prompting  can 
be  used  to  indicate  when  the  computer  expects  data  to  be  entered.    Tones  can  be 
generated  at  just  about  any  time  for  any  reason  in  a  program.    The  programmer's 
imagination  can  guide  the  placement  of  these  tones. 

CONCLUSION 

The  incorporation  of  tones  through  the  routines  discussed  in  this  paper 
will  aid  in  the  humanizing  of  software  used  in  the  Apple  computer.   These  routines 
can  also  help  in  transforming  a  dull  program  into  a  lively  one.    They  are  relatively 
easy  to  use  and  are  a  valuable  addition  to  any  program. 
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0000- 
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0008- 
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01 

08 
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??? 
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J  MP 
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$8085 

$88 

$888£ 


$888C 

$01 

$0014 


$0838 


FIGURE  1.  Machine  Language  Program 


adapted  from  a  program  by  P.  Lutas. 


32888  POKE  2,173:  POKE  3,48s  POKE 
4,192;  POKE  5,136:  POKE  6,288 
:  POKE  7,4:  POKE  8,193:  POKE 
9,1:  POKE  18,248 

32885  POKE  11,8:  POKE  12,282:  POKE 
13,288:  POKE  14,246:  POKE  15 
,166:  POKE  16,8:  POKE  17,76 
:  POKE  18,2:  POKE  19,8:  POKE 
28,96:  RETURN 


FIGURE  2.     BASIC  "POKES 


25  POKE  8,P:  POKE  1,D:  CfiLL  2: 
RETURN 


FIGURE  3.  GOSUB 


Hi gh- Resolution  Operating  Subroutines 


These  subroutines  were  created  to  make  programming  for 
High-Resolution  Graphics  easier,   for  both  BASIC  and  machine- 
language  programs.      These  subroutines   occupy  757  bytes  of  memory 
and  are  available  on  either  cassette  tape  or  Read-Only  Memory 
(ROM),     This  note  describes  use  and  care  of  these  subroutines. 

There  are  seven  subroutines  in  this  package.     With  these, 
a  programmer  can  initialize  High-Resolution  mode,   clear  the  screen, 
plot  a  point,   draw  a  line,   or  draw  and  animate  a  predefined  shape, 
on  the  screen.     There  are  also  some  other  general -purpose 
subroutines  to  shorten  and  simplify  programming. 

BASIC  programs s can  access  these  subroutines  by  use  of  ,the 
CALL  statement,   and  can  pass  information  by  using  the  POKE  state- 
ment.    There  are  special  entry  points  for  most  of  the  subroutines 
that  will  perform  the  same  functions  as   the  original  subroutines 
without  modifying  any  BASIC  pointers  or  registers.     For  machine 
language  programming,   a  JSR  to  the  appropriate  subroutine  address 
will  perform  the   same  function   as   a  BASIC  CALL. 

/ 

In  the  f ol lowing  subroutine  descriptions,   all  addresses 
given  will  be  in  decimal.     The  hexadecimal  substitutes  will 
be  preceded  by  a  dollar  sign  ($) .     All1 entry  points  given  are 
for  the  cassette  tape  subroutines,   which  load  into  addresses 
C00  to  FFF  (hex).     Equivalent  addresses   for  the  ROM  subroutines 
will  be  in  italic  type  faoe. 
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Hiph-Resolution  Operating  Subroutines 


INIT      Initializes  High-Resolution  Graphics  mode. 
From  BASIC:  CALL  3072   (or  CALL  -12288) 
From  machine  language:  JSR  $C00  (or  JSR  $D000) 

This  subroutine  sets  High-Resolution  Graphics  node  with  a 
280  x  160  matrix  of  dots  in  the  top  portion  of  the  screen  and 
four  lines  of  text  in  the  bottom  portion  of  the  screen.  INIT 
also  clears  the  screen. 


CLEAR      Clears  the  screen. 

From  BASIC:  CALL  3886   (or  CALL  -12274) 

From  machine  language:  JSR  $C0E  (or  JSR  $D00E) 

This  subroutine  clears  the  High-Resdlution  screen  without 
resetting  the  High-Resdlution  Graphics  mode. 


PLOT      Plots  a  point  on  the  screen. 

From  BASIC:  CALL  378JJ  (or  CALL  -11S8B) 

From  machine  language:  JSR  $C7C  (or  JSR  $D07C) 

This  subroutine  plots  a  single  point  on  the  screen.  The 
X  and  Y  coodinates  of  the  point  are  passed  in  locations  800, 
801,  and  802  from  BASIC,  or  in  the  A,  X,  and  Y  registers  from 

machine  language.     The  Y  (vertical)  coordinate  can  be  from  0 
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Hiqh-Resloution  Operating  Subroutines 


PLOT  (continued) 

(top  of  screen)  to  169  (bottom  of  screen)  and  is  passed  in 
location  802  or  the  A-register;  but  the  X  (horizontal)  coordinate 
can  range  from  0  (left  side  of  screen)  to  279  (right  side  of  screen) 
and  must  be  split     between  locations  800   (X  MOD  256)  and  801 
(X/256).or,  from  machine  language,  between  registers  X  (X  LO) 
and  Y  (X  HI).     The  color  of  the  point  to  be  plotted  must  be  set 
in  location  812  ($32C).     Four  colors  are  possible:  0  is  BLACK, 
85   ($55)   is  GREEN,   170   ($AA)   is  VIOLET,   and  255   (*FF)   is  WHITE. 


POSN       Positions  a  point  on  the  screen. 
From  BASIC:  CALL  3761   (or  CALL  -11S99I 
From  machine  language:  JSR  $C26   (or  JSS  $D026) 

This  subroutine  does  all  calculations  for  a  PLOT,  but  does 
not  plot  a  point  .(it  leaves  the  screen  unchanged).     This  is  useful 
when  used  in  conjunction  with  LINE  or  SHAPE  (described  later). 
To  use  this  subroutine,  set  up  the  X  and  Y  coordinates  just  the 
same  as  for  PLOT.     The  color  in  location  812  ($32C)  is  ignored. 


LINE      Draw  a  line  on  the  screen. 
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High-Resolution  Operating  Routines 


LINE       Draws  a  line  on  the  screen. 

From  BASIC:  CALL  3786  (or  CALL  -US74) 

From  machine  language:  JSR  $C9S   (or  JSR  $D(f9S) 

This  subroutine  draws  a  line  from  the  last  point  PLOTted 
or  POSN'ed  to  the  point  specified.     One  endpoint  is  the  last  point 
PLOTted  or  POSN'ed;  the  other  endpoint  is  passed  in  the  same  manner 
as  for  a  PLOT  or  POSN.     The  color  of  the  line  is  set  in  location 
812   ($32C).     After  the  line  is  drawn,  the  new  endpoint  becomes  the 
base  endpoint  for  the  next  line  drawn. 


SHAPE       Draws  a  predefined  shape  on  the  screen. 
From  BASIC:  CALL  3805  (or  CALL  -11SSS) 
From  machine  language:  JSR  $DBC  (or  JSR  $D1BC) 

This  subroutine  draws  a  predefined  shape  on  the  screen  at 
the  point  previously  PLOTted  or  POSN'ed.  The  shape  is  defined 
by  a  tablc.of  vectors  in  memory.  (How  to  create  a  vector  table 
will  be  described  later).     The  starting  address  of  this  table 
should  be  passed  in  locations  804  and  805  from  BASIC  or  in<:the 
Y  and  X  registers  from  machine  language.     The  color  of  the  shape 
should  be  passed  in  location  28  ($1C). 

There  are  two  special  variables  that  axe  used  only  with  shapes 
the  scaling  factor  and  the  rotation  factor.     The  scaling  factor 
determines  the  relative  size  of- the  shape.     A  scaling  factor  of 

49 


Hiph-Rcsolution  Operating  Subroutines 


SHAPE  (continued) 

!  will  cause  the  shape  to  be  drawn  true  size,  while  a  scaling 
factor  of  2  will  draw  the  shape  double  size,   etc.     The  scaling 
factor  is  passed  in  location  806  from  BASIC  or  $32F  from  machine 
language.     The  rotation  factor  specifies  one  of  64  possible  angles 
of  rotation  £.r  the  shape.     A  rotation  factor  of  0  will  cause  the 
shape  to  be  drawn  right-side  up.  where  a  rotation  factor  if  16 
will  draw  the  shape  rotated  90°  clockwise,   etc.     The  rotation 
factor  is  passed  in  location  807  from  BASIC  of  in  the  A-register 
from  machine,  language. 

The  table  of  vectors  which  defines  the  shape  to  be  drawn  is 
a  series  of  bytes  stored  in  memory.     Each  byte  is  divided  into 
three  sections,   and  each  section  specifies  whether  or  not  to  plot 
a  point  and  also  a  direction  to  move   (up.   down.   left,  or  right). 
The  SHAPE  subroutine  steps  through  the  vector  table  byte  by  byte, 
and  then  through  each  byte  section  by  section.     When  it  reaches 
a  00  byte,  it  is  finished. 

The  three  sections  are  arranged  in  a  byte  like  this: 
 _______  ^        oo-  9»  &  T 


0  j  o  1  *  ,  o  0 


01  "  * 
I  tf>  > 


Each  bit^rDD^ifi..  auction  to  move,  and  the  two  bits 
P  specify  whether  or  not  to  plot  a  point  before  moving.  Notice 
that  the  last  section  (most  significant  bits)  does  not  have  a  P 
field,  so  it  can  only  be  a  move  without  plotting.   IThe  SHAPE 
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Hiph-Resolution  Operating  Subroutines 


SHAPE  (continued) 

subroutine  processes  the  sections  fro-  right  to  left  (least 
significant  bit  to  most  significant  bit).     IF  THE  REMAINING  SECTIONS 
OF  THE  BYTE  ARE  ZERO,  THEN  THEY  ARE  IGNORED.     Thus,  the  byte 
cannot  end  with  sections  of  00  (neve  up  without  plotting). 


Here  is  an  example  of  how  to  create  a  vector  table: 


Suppose  we  want  to  draw  a  shape  like  this:      # *   *  *• 

\   •    ♦  # 

First,  draw  it  on  graph  paper,  one  dot  per  square.     Then  decide 

where  to  start  drawing  the  shape.     Let's  start  this  one  in  the  center. 


Next,  we  must  draw  a  path  through  each  point  in  the  shape,  using 


only  90°  angles  on  the  turns. 


Next,  re-draw  the  shape  as  a  series  of  vectors,  each  one  moving 
one  place  up.  down.  left,  or  right,  *J?j^^ish  th° 
plot  a  point  before  moving: 


Now  "unwrap"  those  vectors  and  wi- 


ght line. 


Now  draw  a  table  like  the  one  in  Figure  1.     For  each  vector  in  the 
line,  figure  the  bit  code  and  place  it  in  the  next  available  section 
in  the  table.     If  it  will  not  fit  or  is  a  00  at. the  end  of  .  byte. 


th 


en  skip  that  section  and  go  on 


to  the  next.     When  you  have  finished 
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High-Resolution  Operating  Subroutines 


v 


SHAPE  (continued) 

coding  all  vectors,   check  your  work  to  make  sure  it  is  accurate. 
Then  make  another  table   (as  in  figure  2)   and  re-copy  the  coded 

ectors  fro*  the  first  table.     Then  decode  the  vector  information 
into  a  series  of  hexadecimal  bytes,  using  the  haxidecimal  code 
table  in  figure  3.     This  series  of  hexadecimal  bytes  is  your  shape 
definition  table,  which  you  can  now  put  into  the  Apple  XX-.  -mory 
and  use  to  draw  that  shape  on  the  screen. 
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>REH  HIKES  DEHG-BfiSIC  LISTING 
>L1ST 

•  IHI7=3i7£ : CLEAR=38Sb: ?uSH=S7bi 
; FLGT=c7S3: Lirit=S7ct:  SnfiFE= 
S3fl5;FIKD=-6b7;iIHTB^384« 
5  DIM  XU8WU8) 
ii  IZ;-.i  :  :.FiL  -536:  >ThF.  4;  Tfib 
Hi  PRINT  -m  lit  ma  11  *t*' 
:  PRINT  r  *-*  HIGH  rESQLliTiOr-;  G 
RRPF.ICS  DE^SS  FRIHT 
15  FR^T  1  RFSL-Gfl  LIKE  DF-ha  P"  BPS 
IC  SPEED-;  PRINT  "i  KnhjjH  SnhPE 
PROJECTED  INTO  SCMF" 
Efi  P.\<\  "5  CnSIS"  FOLLf-1: 
pc:n:  ^  ;^fOR  SHhPE  SPIRR^I*] 
I:"  PRlhT  :"  SPIPGGRriP 

W 

a  PRInT  '  i  HI -RES  DOhUT: ;  rKlfii 
"7  RHffiOP  sP'i  FRIH- 
"6  SUrl  OP  T*)0  SINE  taRvES'' 

3?  PRhT  ;  FRiiiT       w  nEt  FOR  N 
E*  vC/i' ,  PRInT  =TVFE  COfiTR^  C 
;  RETuRh  BUTTun  THEh    TYPE  'T 

35  PR!:-  ;  ;:FvP  "=hICH  1^0  *  IE  : 

95  IF  AI<1  0?  £I.b  7rl:-.  08Ll 

Inln  GOTO  166^1 
136  C4d  >sTT=  i=42r*=X:  GOS-B  2666 
:  FC:;E  2l2,2:5;  Fl.07 

2666;  Of-   L^F:  I1  NCI  rsd 

130?;  7-F,  ^GE  23,:  FEFk  ; 
23  ~  RhD  -;3-tI  =  W  GOSOB- 
3666:  GOTO  IlO 
266  GO^F  R:£  .c"-27?n= 

^2.-153;  lF-  ^Ot:  FOR 
>1  ~:  30;  FOR      TO  ?:  FOkF 
000, FO0  350:  F8KF  00: , 

h\h/m\  rui\L  oHc,=\  =  /;  L-ni-i_ 

LINE 


538  IF  RHD  (586KC  THEN  POKE  28 
f  RHD  <4>*85;Y=YfYDIR*B;  IF 
Y>=8  RND  YU66  THEH  5l8rYDIR- 
-YDIR;Y=-Y;  if  Y<8  THEN  Y=Y+ 
318;  GOSUB  3888;  GOTO  516 

088  POKE  -16382,8:  POKE  708,5:  POKE 
703,6:  POKE  868,146?  POKE  881 
J:  POKE  862,8:  POKE  864,8; 
POKE  885,3;  POKE  812,255;  CfiLL 
POSH 

Fl?  FOR  R=0  T3  4;68;  ?&1  307, R  rGO 
o4:  rur^L  b?=6,c-&-        U  nub 
hi  A  ~-~L~-  Ei-OF'i;  *iE"™  R;  00:3 
3666;  GOTO  6l6 

766  ;=  Fs:  ao}r  r^?  ,l6^=  m 

,3-3--        ;2l~  -36;;LZ 
\?,  0;  PRIKT  -REOH=  z 

710  300=;:  4888;  GOSuE  3630;  GOTO 
768 

806  liiFL"  LRE^  FREQ  il=\J;  hFO; 
•REL  FREi  iE=:/;  IHFuT  ^OOE  ^i 

8:6  GOOuF  £660:  G03ub  3086?  GOTO 
888 

I860  CfiLL  CLEfiR:  POKE  818,  RHD  ( 
3^85t85;R=  RHD  (3H2t  RHD 
(2);  FOR  1=1  TO  R;X(i)=  RHD 
(168)n(Ip  RHD  (168);  NFKT 
I 

1818  M(l)n=VU);  GOSUB  8808;  RETURN 
2888  POKE  888,x  HOD  256;  POKE  881 
,K>255:  POKE  882,Vi  RETURN 

:060  IF  rFEK  \-1d304;\:26  TrtFK  RE'oRh 
;  POkE  -10360, 6;  POP  ;  GOTO 
16 

-068  Oc.i  IhlT;  FG?:e  813,255:^8 
;B=6;  FOR  1=6  TO  279;  rKOtj, 
nOD  256;B-(BtK;  HOD  250;V- 
\  rzlf.  G:^T8,tn;^  FEE<  -.SIHTeif 
B))W16 

48:8  FORE  388,1  FiOO  253:  POKE  301 
a>255;  FOkE  602.Y;  CfiLL  LIHE- 
z~\  NOT  1  OR  L.;  hi  -  ii 


2I8.K(I)=«X(IH)*9/i8+X:¥(I)=( 

¥(iHW/I6tY;  NEXT  Lh  GOSUB 

3086;  GOTO  288 
386  CfiLL  INiT;X=  RND  (£4Hi8t£B 

;Y=  RHD  (I4)M0t?8;  POKE  812 

f  RHD  (3)«t85;  GOSUB  2888 

i  CfiLL  PLOT 
316  IF  RHD  (1868X1  THEH  368;  IF 

NOT  RHD  (280)  THEN  POKE  28; 
RHD  C4M5 
329  xbvt(  RHf) ■■(3H)*25:Yi=Y+( 
RND  (3)-lm5;  IF  XK8  OR 

xi)279  OR  YKB  OR  YDI59  THEH 

328 

338  X=XI:Y=¥Is  GOSUB  2668;  CALL 
_:-F;  ]:S:3E  3666;  GOTO  ;;8 
488  G0F03  1688;  FOkE  8:2,  RnO  { 

41^  rUK  4-1  iU  c3»  r=j?i  i=l  iu 
-O^F  368,^1  frOD  255;  FGr'.E 

LiviL 

428  h-\h\l  ro6-\iKirib}fz0?;l$ 

/o^:- S8-86;^I)-^:  KE-:  :, 
J;  03508  3888;  30:3  466 

lit  FfiiL  I^IT;  p0r,E  868,8;  CHl.;- 

516  r'liKE  860,6;  ":*G:-I  rOl.O;  F3\F 
202,.:  0F-_-  .I'iF;  F7r-,E  2-08, 
-F73-:'-  riOO  c56:  rOKE  36:,.-.. 
34;  FvE  383,153;  3^l-_  _/:E; 
rOfl  606,23;  "/i  881,:;  =CKl 
668,159-1;  ChiL  LliiE 

5::  :p  ;o        t.FK  526;h=;-  ^7 

526  :0-E  368,-      256;  POfZ  :0l 
255^  :FH.E  082,6;  OFl-.  ,.:HF; 

7nE;^  5S-3;  •I:r=-\[*.r:p=-..;  Ir 

.  -.6  THEn  ;z:t:53 


ROD'S  COLOR  PATTERN 


PROGRAM  DESCRIPTION 

ROD'S  COLOR  PATTERN  is  a  simple  but  eloquent  program.    It  generates  a 
continuous  flow  of  colored  mosaic-like  patterns  in  a  40  high  by  40  wide 
block  matrix.    Many  of  the  patterns  generated  by  this  program  are  pleasing 
to  the  eye  and  will  dazzle  the  mind  for  minutes  at  a  time. 

REQUIREMENTS 

4K  or  greater  Apple  II  system  with  a  color  video  display. 
BASIC  is  the  programming  language  used. 

PROGRAM  LISTING 


168  GR 

185  FOR  y=3  TO  56 
118  FOR  1=1  TO  19 
115  FOR  J=8  TO  19 
128  K=W 

138  e0L0R=J*3/(I+3)+I«ll/t2 

135  PLOT  U.i  PLOT  U:  PLOT  48 
-i,48-K 

136  PLOT  48-M8-I:  PLOT  SC,48-i; 

PLOT  4H.K:  PLOT  !,48-K:  PLOT 
48-KJ 
148  MEXT  hi 
145  HEXT  y:  GOTO  185 
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PROGRAM  LISTING:  PONG 


5  REM  PONG  BY  WENDELL  BITTER 
18  REM  7/7/77 
15  REM  FADDLE  SyiTCHES  CONTROL 

PADDLE  SIZE  AFTER  A  HISS 

OR  DURING  A  HIT 

£6  GR 

£5  DIM  P<3):  DIN  HPs(18) 
38  fi=38sB=liC=-i 

35  CGLGR=t3:  HLIN  1,38  AT  8;  HLIN 

1,38  AT  39 
48  CALL  -936:  VTflB  £3;  INPUT  "HANDB 

ALL  OR  PONG  ?  \HP* 
45  INPUT  "PADDLE  SIZE  (1-6)  B, 

PS:  IF  FSU  OR  PS>6  THEN  45 

:S=PS-1 
58  CALL  -93b 

55  IF  HPKDfH"  THEN  £85 
68  H=l:  C0L0R=13:  VUH-8,39  AT 

39:  GOTO  £85 
65  FOR  X=A  TO  B  STEP  C 
78  Y=m¥:  IF  Y>1  BHD  ¥<38  THEN 

88:  IF  m  THEN  Y=l:  IF  Y>38 
THEN  ¥=38 
75  V=-¥:  FOR  T=l  TO  5:H=  PEEK 

(-16336):  NEXT  T 
88  IF  X=C  OR  X=39+C  THEN  85:  CQLOR= 

8:  PLOT  K.YY:  CQLOR=15:  PLOT 

X,Y 

85  YY=Y:  IF  X  NOD  £=8  THEN  GOSUB 

£35:  NEXT  X 
98  GOSUB  £35 

95  IF  SCRN(X,Y+V*(Y+V<48  AND  Y+ 

¥>-i  >>=8  THEN  165 
188  FOR  T=l  TO  18:11=  PEEK  (-16336 

):  NEXT  T 
185  IF  H  AND  08  THEN  138 
118  PF=P(X/38) 

115  IF  Y=PP  THEN  ¥=3:  IF  Y=FP+1 
THEN  V=£:  IF  Y=PP+2  THEN  V= 

1 


128  IF  Y=PP+3  THEN  ¥=-1:  If  Y=PP+ 

4  THEN  ¥=-2:  IF  Y=PP*5  THEN 
V=-3 

125  IF  S=8  THEN  ¥=3-  1ND  (7) 

138  C0LQR=8:  PLOT  X-CfY 

135  IF  (H  AND  08)  OR  (VYO=  BBS 

(V)  AND  X=8)  THEN  V=4-  SKD 

(9) 

148  IF  M  THEN  VYO=  BBS  (V) 

145  B=39-H:B=39-8:C=-C 

158  IF  PEEK  H6286))i£?  AND  Si 

5  THEN  S=S+l 

155  IF  PEEK  (-16287)>1£7  AND  Si 

8  THEN  S=S-1 
168  GOTO  65 

165  COLON:  PLOT  X-C,Y 

178  C0L0R=15:  PLOT  X.Y+WY+W- 

1  AND  YtV<48) 
175  FOR  T=l  TO  75:N=  PEEK  (-16336 

)+  PEEK  (-16336)-  PEEK  (-16336 

):  NEXT  T 
188  IF  X=8  THEN  SR=SR+1:  IF  X=39 

THEN  SL=SL+1 
185  VTflB  £3:  TAB  7:  PRINT  SL;:  TAB 

33:  PRINT  SR 
198  C0L0R=8:  PLOT  X-C.Y 
195  IF  SL=15  OR  SR=15  THEN  £68 
288  COLORS:  PLOT  X,Y+V*(YW-1 

AND  Y+¥Y<48) 
£85  FOR  T=l  TO  75:  IF  T  HOD  518 

THEN  218:  IF  PEEK  (-16286) 

)1£7  AND  SI5  THEN  S=S+1:  IF 

PEEK  (-16£8?))127  AND  St8  THEN 

S=S-1 

£18  GOSUB  235:  NEXT  T 

215  YY=P(8):  IF  X=8  THEN  YY=P<1 

) 

i£8  IF  H  THEN  YY=  RHD  (37  HI 
££5  M-  RND  (3) 
£38  GOTO  65 


235  IF  H  THEN  245:P(i)=((  PDL  ( 
l)-£4)*20)/115:  IF  P(1)=P(3 
)  THEN  245:  IF  P( 1 )(8  THEN 
P(l)-8:  IF  P(1HS>39  THEN  PC 
1)=39-S 

248  C8tOR=6:  ¥LIN  P(1),P(1HS  AT 
39:  C0LQR=8:  IF  P(15>P(3)  THEN 
VLIN J,P(15-1  AT  39:  IF  P(l 
KP(3)  THEN  VLIN  PCI  MM, 39 
AT  J?:P(3)=P(i) 

245  PC8)=U  PDL  (8)-24)*28)/M5 
:  IF  P(8)<8  THEN  PCS 5=8:  IF 
P(8)=P(2)  THEN  RETURN  :  .IF 
P(8)+S>39  THEN  P(8)=39-S 

258  C0L0R=6:  VLIN  P(6),PC85+5  AT 
8:  C0L0R=8:  IF  P(8))P(2)  THEN 
VLIN  B,P(.BM  AT  8:  IF  P(85 
<P(2)  THEN  VLIN  P(8HS+1,39 
AT  8 

255  C0L0R=8:  IF  P(8)>P(2)  THEN 
VLIN  8,P(8)-1  AT  8:  IF  P(8)' 
<P(2)  THEN  VLIN  P(«)+S+l,39 
AT,  8:P(£)=P(8);  RETURN 

£68  PRINT  ":  END 

265  END 
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COLOR  SKETCH 


PROGRAM  DESCRIPTION 

Color  Sketch  is  a  little  program  that  transforms  the  Apple  II  into  an 
artist's  easel,  the  screen  into  a  sketch  pad.    The  user  as  an  artist 
has  a  40  high  by  40  wide  (1600  blocks)  sketching  pad  to  fill  with  a 
rainbow  of  fifteen  colors.    Placement  of  colors  is  determined  by 
controlling  paddle  inputs;  one  for  the  horizontal  and  the  other  for 
the  vertical.    Colors  are  selected  by  depressing  a  letter  from  A  through 
P^  on  the  keyboard. 

An  enormous  number  of  distinct  pictures  can  be  drawn  on  the  sketch  pad 
and  this  program  will  provide  many  hours  of  visual  entertainment. 

REQUIREMENTS 

This  program  will  fit  into  a  4K  system  in  the  BASIC  mode. 
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PROGRAM  LISTING:    COLOR  SKETCH 


5  POKE  ?fi?3:  POKE  3,48:  POKE 
4,192;  POKE  5,165:  POKE  6=8 
:  POKE  7,32:  POKE  8,168;  POKE 
9,252:  POKE  16,165:  POKE  11 
,h  POKE  12,288:  POKE  13,4 

18  POKE  14,198:  POKE  15,24:  POKE 
16,248:  POKE  17,5:  POKE  18, 
188:  POKE  19,1:  POKE  28,76: 
POKE  21,2:  POKE  22,8:  mE 
23,96 

15  DIN  81(46):  TEXT  :  CALL  -936 

:  GOTO  96 
28  CALL  -936:  GOTO  98 
25  fl=  LEH(B*>:  FOR  Z-l  TO  fi:  GOSUB 

65:  PRINT  B«Z,Z)::  EXT  Z: 
GOSUB  70:  RETURN 
38  Rt=  'ww^twtwMw 

****m*m5-  RETURN 
35  BGCOLOR  SKETCH9:  RETURN 
48  St- "COPYRIGHT  ftPPLE  COMPUTER  197 

7";  RETURN 
45  B$=STH!5  PROGRfiH  fiLLOUS  YOU  TO  3 

:  RETURN 

58  B*=aSKETCH  COLORE*  FIGURES  IN2 
:  RETURN 

55  Bt="LGy  RESOLUTION  GRAPHICS  IJTH 

FfiDDLES5:  RETURN 
68  KK=28:TON=20;  GOSUB  85:  RETURN 

65  KK=18:TON=10:  GOSUB  85:  RETURN 

78  KK=?8;TON=58:  GOSUB  85:KK=38 

:T0N=98i  GOSUB  85:  RETURN 
75  KK=28:T0N=£8:  GOSUB  85:  RETURN 

86  W=8;7O?K50;  GOSUB  85:KK=9 
:T0N=258:  GOSUB  85:  RETURN 


85  POKE  1,TQH  HOB  256:  POKE  24 
,T0K/256ti:  POKE  6,KK:  CALL 
2:  RETURN 

98  GOSUB  38:  GOSUB  25:  PRINT  : 
TAB  13:  GOSUB  35:  GOSUB  25 
:  PRINT  :  GOSUB  38:  GOSUB  25 
:  PRINT  :  TAB  5:  GOSUB  48:  GOSUB 
25;  PRINT  :  GOSUE  38:  GOSUB 
25 

95  PRINT  :  GOSUB  76:  GOSUB  45: 
GOSUB  25:  PRINT  :  GOSUB  58 
:  GOSUB  25:  PRINT  :  GOSUB  55 
:  GOSUB  25:  PRINT 

188  PRINT  :  PRINT  :  GOSUB  78:  INPUT 
-yHEN  READY  HIT  RETURN5, Bt 

185  GR 

118  Bf=5flBCDEFGHlJKLnNOP2:  CfiLL 
-936 

1:5  FCh  Z=6     15:  CGL5R=Z:  FLC" 
ZS2+4.39:  yTAB  2l:  GOSuB  75 
:  733  Z-i+5:  PRInT  SJ.Z-i,:- 
I  •;:  uGZ.'B  75:  NZr  Z:  T-.E 

i 

lii  *7r;E=  2c:S^=TrpE  n  _ZTTEF  73  ~.b 

hhUL  LULUS.-:   UUjUO  CJ".   rRift I 

:Df="ilrL  jhiIl  aim  iu  :nur  ri-sl 
,=:  GOSuS  25:  FRINT 
125  7=  PL  ,:>33'Z55:X=  ?Du  •< 

j?Wc35:  find  c4:  ino  1:  hi-inl 

•'C=JRS0f  PCS:TI>:  1-  :Kr    •  =  ' 
\li  IF  PEEK  \ -16364.  li~  THEh  F5 

:   if  hi-h  riNU  Yi-'i    iilLN  Ic3 
;  i,ULUR=L-t:  FLU;  Si,il:  ir 

FL4.]  "r±>  :S5:  ILCF-C: 
PLOT  X,Y 


135  C2=  SCRH(X,Y):C3=I5;  IF  C2= 
15  THEN  C3=5:  C0L0R=C3:  PLOT 
X,Y;Xi=X;Yi=Y 

146  GOTO  125 

145  IF  PEEK  (-16384)1168  THEN  155 
:FLHG=8:  POKE  -16368,8:  POKE 
34,28:  C0L0R-8:  HLIN  8,39  NT 
39:  CfiLL  -936 

158  PRINT  ;Bi^COHTiNUE  OR  STOP2 
;  VTflB  24:  GOSUB  25:  INPUT 
3  (C/S)  \Bi:  IF  Bi(Li)=5C3 
THEN  118:  PRINT  W:  EHD 

155  FLM=1:C=  PEEK  (-16334  H93 
:  POKE  -16368,8:  GOTO  125 
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MASTERMIND  PROGRAM 


PROGRAM  DESCRIPTION 

MASTERMIND  is  a  game  of  strategy  that  matches  your  wits  against  Apple's. 
The  object  of  the  game  is  to  choose  correctly  which  5  colored  bars  have 
been  secretly  chosen  by  the  computer.    Eight  different  colors  are  possible 
for  each  bar  -  Red  (R),  Yellow  (Y),  Violet  (V),  Orange  (0),  White  (W),  and 
Black  (B).    A  color  may  be  used  more  than  once.    Guesses  for  a  turn  are 
made  by  selecting  a  color  for  each  of  the  five  hidden  bars.    After  hitting 
the  RETURN  key  Apple  will  indicate  the  correctness  of  the  turn.    Each  white 
square  to  the  right  of  your  turn  indicates  a  correctly  colored  and  positioned 
bar.    Each  grey  square  acknowledges  a  correctly  colored  but  improperly  posi- 
tioned bar.    No  squares  indicate  you're  way  off. 

Test  your  skill  and  challenge  the  Apple  II  to  a  game  of  MASTERMIND. 

REQUIREMENTS 

8K  or  greater  Apple  II  computer  system. 
BASIC  is  the  programming  language. 
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PROGRAM  LISTING:  MASTERMIND 


8  REH  GAME  OF  MASTERMIND  8-25-77 

«0Z  (APPLE  COMPUTER) 
16  DIM  ki)Mi)Mi),m')M 

8):X(l)=2:X(25=12;X(3)=i:X( 

4)=13:X(5)=3:X(6)=9:X(75=i5 

sKc8)=5;X$=HBGRYV0yx3 
£8  TEXT  s  CfiLL  -33b;  PRINT  5 


sELCO 

ME  10  THE  GfifiE  OF  MASTERMIND! 

YOUR  OBJECT  IS  TO  GUESS  5  COLOR 
S  cyriicr 
38  PRINT  5 1  ilLL  Ml  UP)  IH  THE  Hi 
HIMUK  NUMBER    OF  GUESSES,  THER 
E  RRE  EIGHT  DIFFERENT  COLORS  TO 
CHOSE  FROM/ 
48  PRINT  ' 

FEiER  THAN  7  GUESSES— EXC 

ELLEMT6:  PRIHT  5    7  TO  9  GUESSE 
S- — GOOD":  PRIHT  5  18  TO  14  G 
UESSES — AVERAGE' 
58  PRINT  nH0RE  THflH  14  GUESSES-POO 
R 


E:  CALL  -384:  TAB  7:  PRINT 

'HIT  ANY  KEY  TO  BEGIN  PLAY" 

188  CALL  -388:  IF  PEEK  (-16384) 
U32  THEN  188:  POKE  -16368', 
8:  GR  :  PRIHT  :  FOR  1=1  TO 
8:C(I)=  RHD  (8H1:  COUJR=W 
I):  HLIH  1*4-2,1*4  AT  39:  PRIHT 
*    ,iX*(I,I);:  NEXT  I 

118  TRY=8:  PRIHT  :  PRIHT  8  LETTER 
KEYS  FOR  COLOR  CHANGE':  PRIHT 
8  ARROy  KEYS  FOR  ADVANCE  AND  BA 
CKn:  PRINT  6    H.ST  RETURN  TO  ACC 
EPT  GUESS  t"; 


288  Y=TRY*2  HUD  36*l:TRY=TRYn: 
TAB  32:  PRIHT  TRY;:  CQLOR= 
8:  HLIH  8,39  AT  Y:FLASH=1;  FOR 
H=i  TO  5;A(H)=8:  GOSUB  1888 
:  NEXT  H:H=I 

388  FOR  yflIT=l  TO  i8;KEY=  PEEK 
(-16384):  IF  KEY<132  THEN  318 
:  POKE  -16368,8:FLR5H=h  FOR 
1=1  TO  8:  IF  KEYO  ASC(X*(I) 
)  THEN  NEXT  I:  IF  1=9  THEN 
318:ft(N)=I:KEY=149 

318  GOSUB  1886:  IF  KEY=141  THEN 
488;  IF  KEY=136  AND  H/l  OR 
KEY=149  AND  H<6  THEN  H=H*KEY/ 
5-28:  NEXT  !AIT:FLASH=1-FLASN: 
GOTO  368 

488  C0L0R=i5:H=8:  FOR  1=1  TO  5; 
D(1)=C(I);J=I:  GOSUB  2868:  NEXT 
I;  IF  M=5  THEN  588:  C0L0R=5 
:  FOR  1=1  TO  5:  FOR  1=1  TO 
5:  GOSUB  2888;  NEXT  I,J:  GOTO 
288 

588  PRINT  :  PRIHT  ' 

YOU  GOT  IT  IN  * 

i TRY i'  TRIES  (';:  IF  TRY<7  THEN 
PRIHT  sEXCELLENTn;:  IF  TRY) 
6  AHD  TRYU8  THEN  PRIHT  "GOOD' 
; 

518  IF  TRY)9  AHD  TRV< 15  THEN  PRIHT 
"AVERAGE*;:  IF  TRY>14  THEN 
PRIHT  BFOGRa;:  PRINT  ")a:  CALL 
-384:' TAB  5:  PRIHT  "HIT  ANY  KEY 
TO  PLAY  AGAIN":  GOTO  188 

1888  IF  H=6  THEN  RETURN  :  COLOR= 
X(A(N))*FLASH:  HLIH  N*4-2,N* 
4  AT  Y:  RETURN 

2888  IF  IK  IX  MX  J)  THEN  RETURN  ; 
fi=fi+l:  PLOT  £1+H+H,Y:  PRINT 
'";:A(I)=8:D(J)=9:  RETURN 


3888  REH  CALL  -384  SETS  INVERSE  VID 
3618  REH  CALL  -388  SETS  NORMAL  VID 
3828  REH  PEEK -16384)  IS  KBD  (ASCII) 

(IF  )  127  THEN  STROBE  SET) 
3838  REM  POKE- 16368  CLRS  KBD  STROBE 
3848  REH  CALL-336  CLEARS  SCREEN  AHD 

TABS  CURSOR  TO  UPPER  LEFT. 
3858  REM  IN  318,  KEY/5-28=  -1  OR  +1 

(ARROl  KEY=136  OR  149  ASCII) 
4888  REH  STMTS  18-58  INTRO 
4816  REM  STMTS  188-118  HEW  SETUP 
4828  REM  STMT  288  HEW  GUESS 
4838  REH  STMTS  388-318  USER  INPUT 
4848  REM  STMT  488  GUESS  EVRL 
4858  REH  STMTS  588-518  VIN 
4868  REM  SUBR  1888  COLOR  LINE 
4878  REM  SUBR  2888  MATCH  TEST 
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BIORHYTHM  PROGRAM 


PROGRAM  DESCRIPTION 

This  program  plots  three  Biorhythm  functions:    Physical  (P),  Emotional  (E), 
and  Mental  (M)  or  intellectual.    All  three  functions  are  plotted  in  the 
color  graphics  display  mode. 

Biorhythm  theory  states  that  aspects  of  the  mind  run  in  cycles.    A  brief 
description  of  the  three  cycles  follows: 

Physical 

The  Physical  Biorhythm  takes  23  days  to  complete  and  is  an  indirect  indicator 
of  the  physical  state  of  the  individual.    It  covers  physical  well-being,  basic 
bodily  functions,  strength,  coordination,  and  resistance  to  disease. 

Emotional 

The  Emotional  Biorhythm  takes  28  days  to  complete.    It  indirectly  indicates 
the  level  of  sensitivity,  mental  health,  mood,  and  creativity. 

Mental 

The  mental  cycle  takes  33  days  to  complete  and  indirectly  indicates  the  level 
of  alertness,  logic  and  analytic  functions  of  the  individual,  and  mental  recep- 
tivity. 
Biorhythms 

Biorhythms  are  thought  to  affect  behavior.    When  they  cross  a  "baseline"  the 
functions  change  phase  -  become  unstable  -  and  this  causes  Critical  Days.  These 
days  are,  according  to  the  theory,  our  weakest  and  most  vulnerable  times.  Acci- 
dents, catching  colds,  and  bodily  harm  may  occur  on  physically  critical  days. 
Depression,  quarrels,  and  frustration  are  most  likely  on  emotionally  critical 
days.    Finally,  slowness  of  the  mind,  resistance  to  new  situations  and  unclear 
thinking  are  likely  on  mentally  critical  days. 

REQUIREMENTS 

This  program  fits  into  a  4K  or  greater  system. 
BASIC  is  the  programming  language  used. 
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PROGRAM  LISTING:  BIORHYTHM 


5  POKE  2,173:  POKE  3,48;  POKE 
4,192;  POKE  5,165;  POKE  6,8 
;  POKE  7,32:  POKE  8,168:  POKE 
9,252;  POKE  18,165;  POKE  11 
,1;  POKE  12,288;  POKE  13,4 

18  POKE  14,198;  POKE  15,24;  POKE 
16,248:  POKE  17,5:  POKE  18, 
198:  POKE  19,1:  POKE  28,?6; 
POKE  21,2;  POKE  22,8:  POKE 
23,96 

15  GOTO  85 

28  TT=3:  GOSUB  38:  RETURN 

25  PRIHT  •**««««***«*♦***«*« 

mm**t*P(*t*\  RETURN 
38  KK=8;T0N=588:  GOSUB  45:  RETURN 

35  KK=8:T0N=258;  GOSUB  45;  RETURN 

48  KK=8:T0H=258:  GOSUB  45;KK=9 
:T0M=258:  GOSUB  45;  RETURN 

45  73KE  1,7*  ?.=:?  256:  ?G;E  24 
,TGw?56tI:  F  =.£  ?,nn:  ChLL 

58  ?:=-■  I"?--         I lH   >:\  F  ?  iVl- 

C;  I '  «  ?-188Ha  i  ■  ?*18e\= 

3»U  1  ) m\ P* iSB-Cx  i  i  i'  iRB'h 

D/1B8) 

::  h-h- ^i88;E^ I ; >*  3E"~  * F? 
!£?-:<■" I  i//;i8-3- 1 ';■  188  -■  " 
F=33» '. '; "3? '!-n*  ^- :<- >:  =ETUFn 

77  <:;=8:TK=5t5:  G35UE  "8:KK-9: 

"s-258;  GGSuB  78:  SETJN 
65  KK=7;Tn=l8s  60SUB  78:  RETURN 


78  POKE  i.TH  HOD  256:  POKE  24, 
TH/256+is  POKE  8,KK;  CRLL  2 
:  RETURN 

75  GO;..!  68:  IHFuT  "Lr.TE  \'„[<,-i  " 
5tt?:Tr'i-fl/ii8tH«3:-!tli-B- 

7-a,;-;M>l'tt:  IF  ,v-i  T-iEN 

h=N-l:E52:  RET*,?- 
8:  l".->  fif-.  ld  -,Ef\3-,3i  • 

Bi-.3-.Ew;=34c:E.c>c«:B:  3 

,=1-1:3-  i/=57::7\2'=7BB:Ci3 

.=:25:E.v- P=2G:3^2>13 
98  E'f,2;=33:  TE-:J  :  EiiL  -936: 
:3--E  3-,2-j:  IGSuE  28: 

25;  5351s  22:  fFlM  :  TnE  ;8 

:  F'RJnT  "r-'-d  II  EI2R-.TrH  '4». 
:  TS  15:  FEIH" 
c5  GCSuE  25:  TfiB  5:  FRIHT  C^IGn 

: ::~  h=?LE  ::s;p,TE--  itf. 

:  :>E  34,1-:  /BE  24 
188  3:S:.E  68:  IS?-/  ^E  \Hf: 
V~ni  11:        ;-*:  VThE:  14 
i  -r;.ihi  "Dis.iri  ::  GubuB  ?3 
:  =F?E  11:  ThB  ll:  ERIN"  "E-IRT- 

l4;nl-h=  CnLL  -3bS 
165  PR'.NT  ~F3:i:4S~  =    333:13  ~5 
;N=h-;ii:  Ir  r=-8  ThEn  :~w:151 
:  :-=TriB  23:  783  il;  7?  1^7  FEF-cCh 
ST  yfiTt  =:r:V;Djv;i;  VTBB 
24:  CALL  -868 


118  J=l:  Gs  :  POKE  34,23:  FOR  X= 
18  TO  88:  C0L0R=3:  HLIH  8,31 
HT  X:  NEXT  X:  HLIH  1,3  RT 
3:  HLIH  1,3  Hi  37:  VLIH  2,4 
HT  2;  VThB  21 

U5  EOF  7=1  75  31  5TEF  2:  PRiNi 
v;:  I?  v.* ;3  T-E-=  PRIM  a  "; 
■  Ha'  r  'j:  €XT  f:  PRIHT 
"  P  E  rf:  VTBB  24 

128  »TRB  23:  ?KKT  ~x.  I  --IVED  ? 
;H:  FOR  !=i  TO  3:  CCLi?.=i« 
I=iH6*u=2H8?u=3>:  VlIr 
8,39  BT  21-itI:  *~fiB  2* 

125  EG?-  ?,=e  TO  3l:F-.fi  HOL-  EVC; 
t?. *  ?lj  Sr.I'.;  Gulub  58:  FLmT 
:.,F;  GOUE  65;  KEXT  hi  NEaT 
1 

138  FRIHT  :  b?vT  53KOTH-ER  pL0T  (V/h 
•  r,B*:  IF  Ei-l,"w=3?E  THEN 
98:  END 
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DRAGON  MAZE  PROGRAM 


PROGRAM  DESCRIPTION 

DRAGON  MAZE  is  a  game  that  will  test  your  skill  and  memory.    A  maze  is 
constructed  on  the  video  screen.    You  watch  carefully  as  it  is  completed. 
After  it  is  finished  the  maze  is  hidden  as  if  the  lights  were  turned  out. 
The  object  of  the  game  is  to  get  out  of  the  maze  before  the  dragon  eats 
you.    A  reddish-brown  square  indicates  your  position  and  a  purple  square 
represents  the  dragon's*  You  move  by  hitting  a  letter  on  the  keyboard; 
U  for  up,  D  for  down,  R  for  right,  and  L  for  left.   As  you  advance  so 
does  the  dragon.   The  scent  of  humans  drives  the  dragon  crazy;  when  he  is 
enraged  he  breaks  through  walls  to  get  at  you.    DRAGON  MAZE  is  not  a  game 
for  the  weak  at  heart.    Try  it  if  you  dare  to  attempt  out-smarting  the 
dragon . 

REQUIREMENTS 

8K  or  greater  Apple  II  computer  system. 
BASIC  is  the  programming  language. 


*   Color  tints  may  vary  depending  upon  video  monitor  or  television  adjustments. 
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PROGRAM  LISTING:   DRAGON  MAZE 


1  TEXT  :  CRLL  -936 

2  PRINT  'mm  TO  THE  DRAGON'S  R 
flZEf5 

3  PRINT  ET0U  HAY  yRTCK  yHILE  I  BUI 
LD  A  HRZE,* 

4  PRIHT  *BUT  HHEH  IT'S  COMPLETE,  I 
!LL  ERRSE3 

5  PRIHT  «IHE  PICTK.  THEN  .YOU'LL 
ONLY  SEE  THE  BRLLS  RS  YOU  BuiiP  I 
HTO  THEN.2 

6  PRIHT  ST0  ROVE,  YOU  HIT  T  FOR 
RIGHT,5 

7  PRIHT  'V  FOR  LEFT,  ;U!  FOR  Iff, 

8  PRINT       FOR  MM,  DO  HOT  HIT 
RETURNS  * 

9  PRINT 

18  PRIHT  "THE  OBJECT, IS  FOR  YOU  (TH 
E  GREEN  DOT* 

11  PRIKT  "TO  GET  TO  THE  DOOR  OH  THE 

RIGHT  SIDE5 

12  PRINT  'BEFORE  THE  DRfiSQN  (THE  RE 
D  DOT)  EfiTS3 

13  PRINT  sYQu,5 

14  PRINT  'BEHRREHHHH!  SQUIRES 

THE  DRAGON3 

15  PRINT  'GETS  REAL  HAD,  BHD  CLIMBS 

OVER  fi  iRLL,5 

16  PRINT  "BUT  HOST  OF  THE  TIKE,  HE 
CAN'T  GO  OVER" 

i?  PRINT  3 AND  HRS  TO  GO  AROUND. 5 

18  PRINT  • 

19  PRINT  aCHINT;  YOU  CAN  OFTEN  TELL 

yHERE  A  mii° 


20  PRINT  3 IS,  EVEN  BEFORE  YOU  CRN  S 
EE  IT,  BY5 

21  PRINT  "THE  FACT  THAT  THE  DRAGON 
CRN ST  GET5 

22  PRINT  "THROUGH  IT! r 

23  PRIHT 

89  DIM  Hf(3) 

98  PRINT  3 TYPE  !W  TO  BEGIN  s 

INPUT  fit 
188  GR  s  C0L0R=15 
185  CALL  -93b;  PRIHT  "DRAGON  HAZE5 
j;  TAB  (255;  PRINT  E GARY  J,  SHAH 
HON3 

Ha  FOR  1=8  TO  39  STEP  3:  VLIH 
8,39  AT  h  HLIH  8,39  AT  I:  HEX! 
I 

128  COLOR=B 
136  5=1888 

1888  DIH  H(lG9),T(ib9) 
1881  FOR  1=1  TO  imUlMi  NEXT 
i 

1818  FOR  1=1  TO  !S9:H(I5=lli  NEXT 
I 

1838  X=  RND  (13)+hY=  RND  (13H1 

:C=169 
1835  IF  C=l  THEN  1288 
1848  R=8:D=8:L=8:U=8:i<=X+13*(Y-i 

):?KK5=-  RBS  (PS(K)):C=C-1 
1858  IF  X=13  THEN  1868s R=H< K-h  1  >> 

8 

1868  IF  Y=13  THEN  i878:D=8<K+i3) 
>8 

1878  IF  X=l  THEN  1888jL=H(K-1»8 

1888  IF  Y=l  THEN  189B:U=H(K-i3» 
8 


1898  Q=R+D+L+fl 

1188  IF  <(K3  RND  RND  (18X2}  OR 

0=8  THEH  1178 
1116  DR=  RND  W 
1128  GOTO  1138ti8*DR 
1138  IF  HOT  R  THEH  lilfl;K(K)=H(K) 

+1:X=X*1 

1135  VLIH  3*Y-2,3?Y-1  HT  3*(X-1) 

1136  GOTO  1835 

1148  IF  NOT  D  THEN  lli8:R(K)=H(K5 
tl8:Y=Y*i 

1145  HLIH  3*X-2,3*X-|  RT  3?(Y-1) 

1146  GOTO  1835 

1158  IF  NOT  L  THEN  1118;mK-l)=H( 
K-!H;X=X-i 

1155  VLIN  3*¥-2,3*Y-i  RT  3»X 

1156  GOTO  1835 

1168  IF  HOT  U  THEH  iU8;H(K-i3)= 
H(K-133-i8i Y=i-1 
•  1165  HL1N  3*X-2f3*X-.l  AT  3*Y:  GOTO 
1835 

1178  X=  RND  <13M:Y=  RND  (13H1 

1188  IF  i(X+l3*(Y-l>»8  THEN  1178 

1198  C=Ctl:  GOTO  1835 

1288  G0SU8  5888;  PRINT  "THE  HAZE  IS  R 

EADY" 
1285  GR  :  C0L0R=i5 
1218  VLIN  8,39  AT  8:  VLIN  8,39  AT 

39:  HLIH  8,39  AT  8:  HLIH  8, 

39  AT  39 
1228  X=1:Y=  RND  (13M:  COLORS: 
PLOT  3*X-2,3*Y-2 
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DRAGON  MAZE  cont. 


1225  HX=3*X-2:fiY=3*Y-2 

1238  ¥Y=  RND  (13 Hi 

1248  C0LQR=8s  VLIN  3*«¥-g,3*«¥-i 

fiT  39 
1258  SK=13sSY=yY 
1268  QK=3*SX-£eQY=3*S¥-£ 
1278  RD=1 

1588  K=  PEEK  (-163845:  IF  K<128  THEr* 
1588 

1518  POKE  -i6368,8 
1515  K=*:  GiitB  7bM:k=H 
i:k-  IF  5:fc>  hhj  5i=V  THEn  £888 
1528  IF  K=  fi&'F.'J  THEH  2883 
1538  IF  t=  ^'V-  TnES  2588 
1548  IF  ».=  iSuV;  TntH  3888 
1558  IF  ■=  hsC'I'L-';  THE*  3588 
15:8  183,-E-  5868s  GOTO  158? 
2888  :*=;:W=* 

2ils  1=  !M+l3*(Y-l;j  H0r.=  -8  TnEH 
4888 

2828  F:,=;*A-2:FY=5*V-t:  FOR  1=1  7} 

3 

2838  FX=FX+DK:F¥=FY+D¥ 

2848  COLORS 

2868  FOR  K=8  TO  1:  FOR  L=8  10  1: 

PLOT  HX+K,HY+L:  HEXT-  L,Ks-C0LQR= 
8:  FOR  K=8  TO  1:  FOR  L=8  TO 
Is  PLOT  FX+K.FY+Ls  HEXT  UK: 
HX=FX : H¥=F¥ 

2118  HEXT  1 

2115  X=X+DX:Y=Y+!)Y 

2116  IF  X=13  BHD  Y=tiY  THEN  6888' 
2128  GOTO  1588 

2588  DX=-i:DY=8 

2518  IF  H(X*13*(Y-1H)  HOD  18  THEN 
4188 


2528  GOTO  2828 
3888  DX=8:D¥=-i 

3818  IF  fKX+13«(Y-2))/18  THEN  4283 

3828  GOTO  2828 
3588  Dx=8:DY=i 

3515  IF  )KM3*vY-l».'ia  THEN  ij9s 
3528  GOTO  2828 
4818  C0L0R=15 

4828  VLIN  3*(Y-1),3*Y  fiT  3*X 

4838  GOTO  1588 
4188  S0SU8  5888 
4118  C0L0R=15 

4128  VLIN  3*(Y-1),3*Y  AT  3*(X-1) 

4138  GOTO  1588 
4288  G05UB  5888 
4218  C0L0R=15 

4228  HUH  3*<X-i),3*X  fiT  3*<Y-i> 

4238  GOTO  1588 
4388  GOSUB  5888 
4318  C0L9R=15 

4328  HLIH  3*(X-1),3*X  fiT  3*Y 

4338  GOTO  1588 

5888  S=S-1:  FOR  1=1  TO  28: A=  PEEK 
(-16336K  PEEK  (-16336)+  PEEK 
(-16336)+  PEEK  (-16336):  NEXT 
I:  RETURN 

6888  PRINT  sMi  yiH! 3 

6818  GOSUB  5888:  GOSUB  5888:  GOSUB 


7888  IF  X)SX  THEN  7885:  IF  Y>S?  THEN 
7858 

7881  IF  X<SX  THEN  7188:  IF  Y<SY  THEN 
7158 

7885  IF  SX=13  THEN  7858:  IF  T(SX+ 
13*(SY-1»>9  THEN  7816:  IF 
H(SX+t3*(SY-l»  HOD  18  THEN 
7858 

7818  DX=i:DY=8 

7828  C0LGR=8 

7822  RX=3*SX-2:RY=3*SY-2 

7823  FOR  1=1  TO  3sRX=RX+l>X:RY=RY+ 

DY 

7824  C0LOR=8 

7825  FOR  K=8  TO  1;  FOR  L=8  TO  1: 

PLOT  QX+K.QY+L:  NEXT  L,K:  COLQR= 
RD:  FOR  K=8  TO  Is  FOR  L=8  TO 
1:  PLOT  RX+K.RY+L:  NEXT  L.K: 
QX=RX:BY=RY 
7838  HEXT  I 

7835  SX=bX+DX:SY=SYtDY 

7848  T(SX+13*(SV-l))=T(SX+13*(Si- 

DHS 
7845  RETURN. 

7858  IF  SY=13  THEN  7188:  IF  T(SX+ 
.13*(SY-1)')>9  THEN  7868:  IF 
K<SX+13*(SY-1»/18  THEN  7188 

7868  DX=8:DY=h  GOTO  7828 
7188  IF  SX=1  THEN  7158:  IF.  KSX+ 
.  i3*(SY-l))>9  THEN  7118:  IF 

H(SX+13«SY-l)-i)  HOD  18  THEN 

7158 


6828  PRINT  »SCGRE=";S+3 
6838  END 
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DRAGON  MAZE  cont . 


7118  DX=-1:0Y=8:  GOTO  7828 
7158  IF  SV=i  THEN  7885:"  IF  TCSX+ 
13*CSY-i»>9  THEN  7168s  IF 
H( SX+ 1 3*( ST- 1 )- 1 3 )/ 1 8  THEN 
7885 

7168  DX=8:DY=-1:  GOTO  7828 

S888  GOSUB  5888:  QOSUB  5888;  GOSUB 

5888:  GOSUB  5888:  PRINT  5 THE  DRfi 

GOH  GOT  ¥0U»a 
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APPLE  II  FIRMWARE 


1.  System  Monitor  Commands 

2.  Control  and  Editing  Characters 

3.  Special  Controls  and  Features 

4.  Annotated  Monitor  and  Dis-assembler  Listing 

5.  Binary  Floating  Point  Package 

6.  Sweet  16  Interpreter  Listing 

7.  6502  Op  Codes 
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System  Monitor  Commands 

ADDle  II  contains  a  powerful  machine  level  monitor  for  use  by  the  advanced 
p?Sgrammer.    To  ente?  the  monitor  either  press  RESET  button  on  keyboard  or 
CALL-151  (Hex  FF65)  from  Basic.    Apple  II  will  respond  with  an  "*  (asterisk) 
prompt  character  on  the  TV  display.    This  action  will  not  kil    current  BASIC 
Droaram  which  may  be  re-entered  by  a  Cc  (control  C).    NOTE:     adrs    is  a 
foS?  digit  hexidecimal  number  and  "data"  is  a  two  dig  t  hexidecimal  number. 
Remember  to  press  "return"  button  at  the  end  of  each  line. 


Command  Format  Example 


Description 


Examine  Memory 

adrs  *C0F2 


adrsl .adrs2 


(return) 


.adrs2 


>1 024. 1048 


*  (return) 


*.4096 


Examines  (displays)  single  memory 
location  of  (adrs) 

Examines  (displays)  range  of  memory 
from  (adrsl)  thru  (adrs2) 

Examines  (displays)  next  8  memory 
locations. 

Examines  (displays)  memory  from  current 
location  through  location  (adrs2) 


Change  Memory 

adrs: data 
data  data 

:data  data 
data 


*A256:EF  20  43 
*:F0  A2  12 


Deposits  data  into  memory  starting  at 
location  (adrs). 

Deposits  data  into  memory  starting 
after  (adrs)  last  used  for  deposits. 


Move  Memory 

adrsl<adrs2. 
adrs3M 


*100<B010.B410M 


Copy  the  data  now  in  the  memory  range 
from  (adrs2)  to  (adrs3)  into  memory 
locations  starting  at  (adrsl). 


Verify  Memory 

adrsl<adrs2. 
adrs3V 


*100<B010.B410V 


Verify  that  block  of  data  in  memory 
range  from  (adrs2)  to  (adrs3)  exactly 
matches  data  block  starting  at  memory 
location  (adrsl)  and  displays 
differences  if  any. 
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Command  Format 


Example 


Description 


Cassette  I/O 

adrsl.adrs2R  *300.4FFR 
adrsl.adrs2W  *800.9FFW 


Reads  cassette  data  into  specified 
memory  (adrs)  range.    Record  length 
must  be  same  as  memory  range  or  an 
error  will  occur. 

Writes  onto  cassette  data  from  speci- 
fied memory  (adrs)  range. 


Display 


t  *t  Set  inverse  video  mode.  (Black  characters 

1  on  white  background) 

N  *N  Set  normal  video  mode.  (White  characters 

on  black  background) 


Dis-assembler 


adrsL 


*C800L 


Decodes  20  instructions  starting  at 
memory  (adrs)  into  65(32  assembly 
nmenonic  code. 

Decodes  next  20  instructions  starting 
at  current  memory  address. 


Mini -assembler 
(Turn-on)  *F666G 

$(monitor  !$C800L 
command) 


adrs: (6502  :C01p:STA  23FF 

MNEMONIC 
instruction) 


Turns-on  mini-assembler.  Prompt 
character  is  now  a  "!"  (exclamation 
point) . 

Executes  any  monitor  command  from  mini- 
assembler then  returns  control  to  mini- 
assembler.   Note  that  many  monitor 
commands  change  current  memory  address 
reference  so  that  it  is  good  practice 
to  retype  desired  address  reference 
upon  return  to  mini-assembler. 

Assembles  a  mnemonic  6502  instruction 
into  machine  codes.    If  error,  machine 
will  refuse  instruction,  sound  bell, 
and  reprint  line  with  up  arrow  under 
error. 
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Command  Format 


Example 


Description 


(space)  (6502  !  STA  J01FF 

mnemonic 
instruction) 

(TURN-OFF)  I  (Reset  Button) 


Assembles  instruction  into  next 
available  memory  location.  (Note 
space  between  "!"  and  instruction) 

Exits  mini-assembler  and  returns 
to  system  monitor. 


Monitor  Program  Execution  and  Debugging 


adrsG 


adrsT 


adrsS 


(Control  E) 
(Control  Y) 


*300G 


*800T 


"cms 


Runs  machine  level  program  starting 
at  memory  (adrs). 

Traces  a  program  starting  at  memory 
location  (adrs)  and  continues  trace 
until  hitting  a  breakpoint.  Break 
occurs  on  instruction  00  (BRK),  and 
returns  control  to  system  monitor. 
Opens  6502  status  registers  (see  note  1), 

Single  steps  through  program  beginning 
at  memory  location  (adrs).    Type  a 
letter  S  for  each  additional  step 
that  you  want  displayed.    Opens  6502 
status  registers  (see  Note  1). 

Displays  6502  status  registers  and 
opens  them  for  modification  (see  Note  1), 

Executes  user  specified  machine 
language  subroutine  starting  at 
memory  location  (3F8). 


Note  1: 

6502  status  registers  are  open  if  they  are  last  line  displayed  on  screen. 
To  change  them  type  ":"  then  "data"  for  each  register. 


Example: 


A  =  3C  X  =  FF 
*:  FF 

*:FF  00  33 


00    P  =  32    S  =  F2 
Changes  A  register  only 
Changes  A,  X,  and  Y  registers 


To  change  S  register,  you  must  first  retype  data  for  A,  X,  Y  and  P. 


Hexidecimal  Arithmetic 


datal+data2 


datal-data2 


*78+34 


*AE-34 


Performs  hexidecimal  sum  of  data! 
plus  data2. 

Performs  hexidecimal  difference  of 
datal  minus  data2. 
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Command  Format  Example 


Description 


Set  Input/Output  Ports 
(X)  (Control  P)  *5P( 


(X)  (Control  K)  *2KL 


Sets  printer  output  to  I/O  slot 
number  (X).    (see  Note  2  below) 

Sets  keyboard  input  to  I/O  slot 
number  (X).    (see  Note  2  below) 


Note  2:  f 
nniv  Oots  1  throuqh  7  are  addressable  in  this  mode.    Address  0  (Ex:  0PL 
or  U )  resets  ports  to  Eternal  video  display  and  keyboard.    These  commands 
w^ll  not  work  unless  Apple  II  interfaces  are  plugged  into  specif iced  I/O 
slot. 


Multiple  Commands 


*100L  400G  AFFT 


^LLLL 


Multiple  monitor  commands  may  be 
given  on  same  line  if  separated  by 
a  "space". 

Single  letter  commands  may  be 
repeated  without  spaces. 
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SPECIAL  CONTROL  AND  EDITING  CHARACTERS 


"Control"  characters  are  indicated  by  a  super-scripted  "C"  such  as  G  .  They 
are  obtained  by  holding  down  the  CTRL  key  while  typing  the  specified  letter. 
Control  characters  are  NOT  disDlaved  on  the  TV  screen.    B    and  C   must  be 
followed  by  a  carriage  return.    Screen  editing  characters  are  indicated  by  a 
sub-scripted  "E"  such  as  Dp.    They  are  obtained  by  pressing  and  releasing  the 
ESC  key  then  typing  specified  letter.    Edit  characters  send  information  only 
to  display  screen  and  does  not  send  data  to  memory.    For  example,  Uc  moves  to 
cursor  to  right  and  copies  text  while  Aj:  moves  cursor  to  right  but  does  not 
copy  text. 


CHARACTER 


DESCRIPTION  OF  ACTION 


RESET  key 


Control  B 


Immediately  interrupts  any  program  execution  and  resets 
computer.    Also  sets  all  text  mode  with  scrolling  window 
at  maximum.    Control  is  transfered  to  System  Monitor  and 
Apple  prompts  with  a  "*"  (asterisk)  and  a  bell.  Hitting 
RESET  key  does  NOT  destroy  existing  BASIC  or  machine 
language  program. 

If  in  System  Monitor  (as  indicated  by  a  "*"),  a  control 
B  and  a  carriage  return  will  transfer  control  to  BASIC, 
scratching  (killing)  any  existing  BASIC  program  and  set 
HIMEM:  to  maximum  installed  user  memory  and  LOMEM: 
to  2048. 


Control  C 


Control  G 
Control  H 


Control  J 
Control  V 

Control  X 


If  in  BASIC,  halts  program  and  displays  line  number 
where  stop  occurred*.    Program  may  be  continued    with  a 
CON  command.    If  in  System  Monitor,  (as  indicated  by  "*"), 
control  C  and  a  carraige  return  will  enter  BASIC  without 
killing  current  program. 

Sounds  bell  (beeps  speaker) 

Backspaces  cursor  and  deletes  any  overwritten  characters 
from  computer  but  not  from  screen.    Apply  supplied 
keyboards  have  special  key        on  right  side  of  keyboard 
that  provides  this  functions  without  using  control  button. 

Issues  line  feed  only 
r 

Compliment  to  H  .    Forward  spaces  cursor  and  copies  over 
written  characters.    Apple  keyboards  have        key  on 
right  side  which  also  performs  this  function. 

Immediately  deletes  current  line. 

If  BASIC  program  is  expecting  keyboard  input,  you  will  have 
to  hit  carriage  return  key  after  typing  control  C. 
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SPECIAL  CONTROL  AND  EDITING  CHARACTERS 
(continued) 


CHARACTER  DESCRIPTION  OF  ACTION 


A£  Move  cursor  to  right 

B£  Move  cursor  to  left 

C^  Move  cursor  down 

D£  Move  cursor  up 

E£  Clear  text  from  cursor  to  end  of  line 

Clear  text  from  cursor  to  end  of  page 

@F  Home  cursor  to  top  of  page,  clear  text  to  end 

of  page. 
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Special  Controls  and  Features 
Hex  BASIC  Example 


Description 


Display  Mode  Controls 


C05O 
C051 
C052 
C053 
C054 

C055 
C056 
C057 


1  f%. 

10 

POKE 

-  loo|04,J9 

20 

POKE 

-16303,0 

30 

POKE 

-16302,0 

40 

POKE 

-16301  ,0 

50 

POKE 

-16300,0 

60 

POKE 

-16299,0 

70 

POKE 

-16298,0 

80 

POKE 

-16297,0 

Set  color  graphics  mode 

Set  text  mode 

Clear  mixed  graphics 

Set  mixed  graphics  (4  lines  text) 

Clear  display  Page  2  (BASIC  commands 

use  Page  1  only) 
Set  display  to  Page  2  (alternate) 
Clear  HIRES  graphics  mode 
Set  HIRES  graphics  mode 


TEXT  Mode  Controls 

0020  90  POKE  32, LI 

0021  100  POKE  33, Wl 

0022  110  POKE  34, Tl 

0023  120  POKE  35,B1 


0024  130  CH=PEEK(36) 

140  POKE  36, CH 
150  TAB(CH+1) 


0025  160  CV=PEEK(37) 

170  POKE  37, CV 
180  VTAB(CV+1) 

0032  190  POKE  50,127 

200  POKE  50,255 

FC58  210  CALL  -936 

FC42  220  CALL  -958 


Set  left  side  of  scrolling  window 
to  location  specified  by  LI  in 
range  of  0  to  39. 

Set  window  width  to  amount  specified 
by  Ml.    L1+W1<40.  W1>0 

Set  window  top  to   line  specified 
by  Tl  in  range  of  0  to  23 

Set  window  bottom  to   line  specified 
by  Bl  in  the  range  of  0  to  23.  B1>T1 

Read/set  cusor  horizontal  position 
in  the  range  of  0  to  39.    If  using 
TAB,  you  must  add  "1"  to  cusor  position 
read  value;  Ex.  140  and  150  perform 
identical  function. 

Similar  to  above.    Read/set  cusor 
vertical  position  in  the  range  0  to 
23. 

Set- inverse  flag  if  127  (Ex.  190) 
Set  normal  flag  if   255(Ex.  200) 

(@e)  Home  cusor,  clear  screen 

(Fe)  Clear  from  cusor  to  end  of  page 
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Hex  BASIC  Example  Description 

FC9C  230  CALL  -868  (EE)  Clear  from  cusor  to  end  of  line 

FC66  240  CALL  -922  (JC)  Line  feed 

FC70  250  CALL  -912  Scroll  up  text  one  line 

Miscellaneous 

C030  360  X=PEEK(-16336)  Toggle  speaker 

365  POKE  -16336,0 

C000  370  X=PEEK(-16384  Read  keyboard;  if  X>127  then  key  was 

pressed. 

C010  380  POKE  -16368,0  Clear  keyboard  strobe  -  always  after 

reading  keyboard. 

C061  390  X=PEEK(16287)  Read  PDL(0)  push  button  switch.  If 

X>127  then  switch  is  "on". 

C062  400  X=PEEK(-16286)  Read  PDL(l)  push  button  switch. 

C063  410  X=PEEK(-16285  Read  PDL(2)  push  button  switch. 

C058  420  POKE  -16296,0  Clear  Game  I/O  AN0  output 

C059  430  POKE  -16295,0  Set  Game  I/O  AN0  output 

C05A  440  POKE  -16294,0  Clear  Game  I/O  AN!  output 

C05B  450  POKE  -16293,0  Set  Game  I/O  AMI  output 

C05C  460  POKE  -16292,0  Clear  Game  I/O  AN2  output 

C05D  470  POKE  -16291,0  Set  Game  I/O  AN 2  output 

C05E  480  POKE  -16290,0  Clear  Game  I/O  AN 3  output 

C05F  490  POKE  -16289,0  Set  Game  I/O  AN3  output 
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*************************** 

* 

* 

APPLE  II  * 

* 

SYSTEM  MUN 1 1UK 

* 

* 
* 

COPYRIGHT  197?  BY  * 

* 
* 

APPLE  COMPUTER,    INC.  * 

* 

* 
* 

ALL  FIGHTS   RESERVED  * 

* 

S.   WOZNIAK  * 

* 

A.   BAUM  * 

* 

* 

*************************** 


TITLE 

LOCO 

EPZ 

c  n  n 
?  U  U 

LOCI 

EPZ 

>  U  1 

WNDLPT 

EPZ 

$  20 

WNDWDTH 

EPZ 

CO  1 
b  Z  1 

WNDTOP 

EPZ 

COO 
S>  Z  Z 

WND3TM 

EPZ 

$23 

CH 

E  PZ 

C  0  A 

CV 

EPZ 

->  Z  J 

GBASL 

EPZ 

$26 

GBASH 

EPZ 

C  0  7 

$  Z  t 

BASL 

EPZ 

COP 
P  z  c 

BASH 

EPZ 

$29 

BAS2L 

EPZ 

0  ZPi 

BAS2H 

EPZ 

C  OR 
o  £.  n 

H2 

EPZ 

S2C 

LMNEM 

EPZ 

cor* 

RTNL 

EPZ 

$2C 

V2 

EPZ 

$20 

RMNEM 

EPZ 

c  on 

9  Z  U 

RTNH 

EPZ 

con 

MASK 

EPZ 

$2F 

CHKSUM 

EPZ 

cor 
p  zr> 

r  \J  Kiln  1 

EPZ 

$2E 

LA ST IN 

EPZ 

T  PMfiTH 

Li D IN O  in 

EPZ 

$2F 

O  J.  UlN 

EPZ 

$2F 

COLOR 

CD7 

$30 

MODE 

EPZ 

$31 

X  Ll  V  f  uw 

EPZ 

$32 

PROMPT 

PD7 
Cif  £ 

<S  1 1 

I  On  V 

EPZ 

$34 

EPZ 

$35 

CSWL 

PP7 
Ej  c  it 

$36 
$37 

CSWH 

EPZ 

KSWL 

EPZ 

$38 

KSWH 

EPZ 

$39 

PCL 

EPZ 

$3A 

PCH 

EPZ 

$3B 

XQT 

EPZ 

$3C 

AIL 

EPZ 

S3C 

A1H 

EPZ 

$3D 

A2L 

EPZ 

S3  E 

A2H 

EPZ 

$3F 

A3L 

EPZ 

$40 

A3H 

EPZ 

$41 

A4L 

EPZ 

$42 

A4H 

EPZ 

$43 

A5L 

EPZ 

$44 

ASH 

EPZ 

$45 

76 


ACC 

EPZ 

C  A  C 

?  4  5 

XP  EG 

EPZ 

$46 

YREG 

EPZ 

$4  7 

PD7 

Li  t  L 

^  A  8 

SPNT 

EPZ 

$4  9 

RNDL 

EPZ 

c-  4  E 

PN  D'H 

EPZ 

S  4  F 

ACL 

EPZ 

^50 

ACH 

F  P7 

?  51 

X  f  N  0  L 

EPZ 

$  5  2 

XT'-IPU 

EPZ 

$53 

A  UXL 

EPZ 

$  5  ^ 

AUX  H 

EPZ 

^55 

PIC  K 

EPZ 

$95 

EOU 

S  0  2  0  U 

U       r'       L }  Jt  \ 

EOU 

C  A  1  C  O 

50  J  r  b 

.M  N  I 

EOU 

$03FB 

IF  OLOC 

EOU 

S  0  3  EE 

T  PA  nn 

E  C'U 

5  C  0  0  0 

EQU 

$C000 

r\lJil'b  1  Hp 

E  yU 

SC  0 1  0 

1  A  rt  JU  j. 

EOU 

^0  0  20 

SPKR 

ECU 

SC030 

TXTCLR 

EOU 

SCO  50 

n  i  v  'I1  C  (TT 

1  a lbti 

EQU 

$C  0  51 

MIXCLP 

EQU 

$C052 

M IX3ET 

ECU 

$C  0  5  3 

LOW'S  CR 

EQU 

SCO  54 

HISCK 

EOU 

SC055 

LOR  ES 

EOU 

?C  0  56 

H I  RES 

ECU 

$C0  57 

TAPE IN 

EQU 

$C0  6  0 

FAD  fill  U 

EQU 

$C06  4 

EQU 

$C  0  70 

BASIC 

EQU 

$E000 

bAb IC  z 

EOU 
0  PG 

$E  0  0  3 
p  r  o  )  U 

RUM   b 1 A  R  T  ADDRESS 

A  A 

PLOT 

LSR 

A 

Y-COORD/2 

F8  0 1 : 

ftft 
u  o 

47 

PHP 

SAVE  LSB   IN  CARRY 

F80 2 : 

20 

Fft 
r  o 

JSP 

OBASCALC  CALC  BASE  ADR   IN  GBASL.H 

F80  5 : 

28 

PLP 

RESTORE  LSB  FROM  CARRY 

pant  • 
r  o  U  O  ; 

a  q 

0  F 

LDA 

#S0F 

MASK  S0F  IF  EVEN 

F80 8 : 

90 

02 

RTMASK 

r  o  utt  ■ 

ft  Q 

DA 

Ij  u 

ADC 

#$E0 

MASK   $F0   IF  ODD 

F8  OC : 

8  5 

2  E 

RT^AS  \ 

3TA 

^!ASK 

F  8  OE : 

D  1 

oi 

9  £ 
ZD 

PLOT1 

LDA 

(G3A3L) , 

,'£  DATA 

F81 0 : 

45 

30 

EOR 

COLOR 

XOR  COLOR 

P  ft  1  9  • 

9  ^ 

Z  J 

9  F 

AND 

MASK 

AND  N?ASK 

roll: 

j  1 

9  a 

ZD 

EOR 

(G^ASL) , 

Y         XOR  DATA 

F816 : 

91 

26 

STA 

(GBASL) f 

Y            TO  DATA 

Fft  1  ft  • 

r  c  i  o  . 

ft  n 
0  U 

RTS 

POl  Q  , 

r  oi?  : 

z  u 

u  u 

Fft 

H  L I N  E 

JSR 

PLOT 

PLOT  SOUARE 

Poll: 

C  A 

C4 

ZL 

HLINEl 

CPY 

H2 

DONE? 

F81 E : 

BO 

1 1 

BCS 

PTS1 

YES,  RETURN 

F82 0 : 

C8 

I  NY 

WO,    IMCR   INDEX  (X-COORD) 

9  n 
Z  U 

0E 

F  8 

JSR 

PLOT1 

PLOT  NEXT  SOUARE 

F8 2 4  : 

9  0 

F  6 

sec 

HLINEl 

ALWAYS  TAKEN 

PR  9  ft  • 

ft  Q 

n  i 

U  i. 

V  L I N  E  Z 

ADC 

*$01 

NEXT  Y-COORD 

F828  : 

48 

VLINE 

PHA 

SAVE  ON  STACK 

Fft  9  Q  • 

r  o  z  y  ; 

z  U 

p  n 
u  U 

F  Q 

JSP 

PLOT 

PLOT  SQUARE 

r  Oil  ; 

ft  ft 

PL  A 

F82D: 

C5 

2D 

CMP 

V2 

DONE? 

Q  O 

F  R 

BCC 

VLINEZ 

NO, LOOP. 

Fft    1  • 

r  oji : 

ft  n 

RTS1 

RTS 

F8  3  2 : 

AO 

2f 

CLRSCP 

LDY 

tf$2F 

MAX  Y,   FULL  SCRN  CLR 

Fft  a  • 

n  n 
u  u 

n  9 
u  z 

PNE 

CLPSC  2 

ALWAYS  TAKEN 

F8 36 : 

AO 

27 

pf  n  rpA  r> 

CLK  i  UP 

LDY 

*$27 

^AX  Y,   TOP  SCRN  CLR 

F8 38 : 

8  4 

2D 

CLPSC2 

STY 

V2 

STORF   AS   ROTTOM  COORD 

if 

FO  R 

VLINE  CALLS 

F8  3  A : 

AO 

27 

LDY 

#$27 

RIGHTMOST   X-COORD    f COLUMN ) 

F8 3C : 

A9 

00 

CLR3C3 

LDA 

*50 

TOP  COOP.O  FOR  VLINE  CALLS 

F8  3E : 

ft  ^ 

J  U 

STA 

COLOR 

CLEAR  COLOR  (BLACK) 

f  ft  d  n  « 

Z  u 

9ft 

zo 

Fft 

JSP 

VLIMP 

TPAK  VLINE 

F8  4  3 : 

88 

DEY 

NEXT  LEFTMOST  X-COOPD 

r  c  s  4  : 

1 U 

r  o 

rHPL 

CLRSC3 

LOOP  UiSTIL  DONE. 

r  o4b: 

ft  n 
o  U 

RTS 

F847: 

48 

G8A  SCALC 

PHA 

FOR   INPUT  nOODFFPM 

F  ft  4  ft  • 

lsp 

A 

F  A  4  Q  • 

9Q 
Z  !? 

U  J 

AND 

+  $03 

u  y 

U  4 

OP  A 

^$04 

GF'.-JERA  FE   GB ASH  -  0  0  C  0  0 1 FG 

f  ft  a  n  • 

0  9 

9  "7 

STA 

GSASri 

r  o  h  r  ; 

ft  Q 

PLA 

AND  G^.VSL-HOEDFOOO 

F8 50 : 

29 

18 

AND 

#$18 

F  ft    9  « 

n  9 
u  z 

sec 

C.^CALC 

F8  54 : 

69 

7F 

AHP 

#$7F 

F856: 

85 

26 

GSCALC 

STA 

Gr^ASL 

77 


F858 

:  OA 

ASL 

A 

F359 

:  0* 

A  St. 

A 

F85A 

:    05  26 

ORA 

GBASL 

F85C 

:    8b  26 

ST  A 

GP  AS  L 

F85E 

:  60 

RTS 

F85F 

:   A5  30 

NXTCOL 

LDA 

COLOR 

INCPE KENT  COLOR  3Y  3 

F8  61 

:  13 

CLC 

F862 

:   69  03 

ADC 

*SG3 

F864 

:    29  OF 

SETCOL 

A  \JC 

SETS  COLOR=17*A  MOD  16 

F866 

:   85  30 

ST  A 

COLOR 

F668 

:  OA 

ASL 

A 

ROTH   HALF  PYTES  OF  COLOR  EQUAL 

F869 

:  OA 

ASL 

A 

F86A 

:  OA 

ASL 

A 

F86B 

:  OA 

ASL 

A 

F86C 

:    05  30 

ORA 

COLOR 

F86E 

:   85  30 

STA 

COLOR 

F870 

:  60 

RTS 

F871: 

:  4^ 

SCFN 

LSR 

a 

READ  SCREEN  Y-COORD/2 

F872: 

:  08 

PHP 

SAVE  LS3  (CARRY) 

F873: 

:    20  47 

F8 

JSR 

GRASCALC 

'  CALC   BASE  ADDRESS 

F6  76: 

:    81  26 

LDA 

(Gh\SL) , Y   GET  RYTE 

F878; 

:  28 

PLP 

PE STORE   LSF   FROM  CARRY 

F879: 

:   90  04 

SCRM2 

BCC 

RTKSK7 

IF   EVEN,    USE   LO  H 

F87B: 

:  4A 

LSR 

A 

F87C: 

:  4A 

LSR 

A 

F87D: 

:  4A 

LSK 

A 

SHIFT   HIGr!  HALF  RYTE  DOWN 

F87E: 

:  4A 

LSR 

A 

F87F: 

29  OF 

AND 

*$0F 

MASK    4-81 TS 

F881: 

60 

RTS 

FB82: 

A*  3A 

IN3DS1 

LDX 

PCL 

PRINT  PCL,f; 

F884: 

A4  38 

LDY 

PC*-' 

F886: 

20  96 

FD 

JSR 

PRYX2 

F  8  8  9  : 

20  ^8 

F9 

JSR 

PRPX^K 

FOLLOWED   3Y   A  BLANK 

FS6C: 

Al  3A 

LDA 

(  PCL , X ) 

GET  OP  CORE 

F88E: 

A8 

I NSC? 2 

TAY 

F88F: 

4\ 

LSR 

A 

EVSVODD  TEST 

F890: 

90  09 

BCC 

I  even 

F892  : 

6% 

ROP 

A 

PIT   1  TEST 

FbS>3: 

30  10 

3CS 

EPP 

XVXXXXll    INVALID  OP 

F695: 

C9  A2 

CMP 

i  ?  a  2 

F897: 

FO  OC 

r  EO 

F  K 

OPCODE   Sri  9  INVALID 

F899  : 

29  87 

AND 

*$87 

-'ASK'  CITS 

F89B: 

4  A 

IEVEU 

LSR 

A 

LSP   INTO  CARFY  FOR   L/P  TEST 

F89C: 

A  A 

TAX 

F89D: 

BO  6  2 

F9 

LDA 

FHTl t X 

GET   FORMAT    I*  DFX  RYTE 

F8A0: 

20  79 

F8 

JSR 

SCRN2 

P/L   H-PYTE   ON  CARRY 

F8A3: 

DO  04 

"*NE 

GETFhT 

F6A5: 

AO  80 

SEP 

LDY 

*?8C 

SUBSTITUTE   $80   FOR  INVALID  OPS 

F8A7: 

A  9  00 

LDA 

f$0 

SET   PRINT   FOPYAT   INDEX  TO  0 

F8A9: 

A  A 

GET  FW T 

PAX 

F8AA  : 

BD  A 6 

F9 

LDA 

f:--it2,  x 

INDEX   INTO   PRINT   FORMAT  TABLE 

F8AD: 

85  2E 

STA 

FORMAT 

SAVE   FOR  ADR   FIELD  FORMATTING 

F8AF: 

29  03 

* 

AND 

*!$03 
(P=l  BYTE 

MASK   FOR   2-3IT  LENGTH 
,    1=2   BYTE,    2=3  BYTE) 

F8B1 : 

85  2F 

STA 

LENGTH 

F8B3: 

93 

TYA 

OPCODE 

F  8  3  4  : 

29  8F 

AND 

#58F 

MASK   FOR   1XXX1010  TEST 

F8B6: 

A  A 

TAX 

SAVF  IT 

r  837: 

98 

TYA 

OPCODE  TO  A  AGAIN 

F8B8: 

AO  03 

LDY 

«$03 

F8BA: 

EO  8A 

CPX 

#S8A 

F8BC: 

FO  OB 

BEQ 

MNNDX3 

P8BE: 

4A 

MNNDXl 

LSR 

A 

F8BF: 

90  08 

BCC 

MNNDX3 

FORM   INDEX   INTO  MNEMONIC  TABLE 

F8C1: 

4A 

LSR 

A 

F8C2c 

4A 

MNNDX2 

LSR 

A 

1)  1XXX1010=>00101XXX 

F8C3: 

09  20 

ORA 

*$20 

2)  XXXYYY01=>00111XXX 

F8C5: 

88 

DEY 

3)  XXXYYY10=>00110XXX 

F8C6: 

DO  FA 

BNE 

MNNDX2 

4)  XXXYY100=>00100XXX 

F8C8: 

C8 

INY 

5)  XXXXX000O000XXXXX 

F8C9: 

88 

MNNDX3 

DEY 

F8CA: 

DO  F2 

BNE 

MNWDX1 

F8CC: 

60 

RTS 

F8CD: 

FF  FF  FF 

DFB 

$FF,$FF,$FF 

F8D0: 

20  82  F8 

INSTDSP 

JSR 

INSDS1 

GEN  FMT t   LEN  BYTES 

F8D3: 

48 

PHA 

SAVE  MNEMONIC  TABLE  INDEX 

F8D4: 

Bl  3A 

PRNTOP 

LDA 

(PCL) ,Y 

F8D6: 

20  DA  FD 

JSR 

PRBYTE 

F8D9: 

A2  01 

LDX 

#$01 

PRINT  2  BLANKS 

F8DB: 

20  4A  F9 

PRNTBL 

JSR 

PRBL2 

F8DE: 

C4  2F 

CPY 

LENGTH 

PRINT  INST    (1-3  BYTES) 

F8E0: 

C8 

INY 

IN  A  12  CHR  FIELD 

F8E1: 

90  Fl 

BCC 

PRNTOP 

F8E3: 

A2  03 

LDX 

#$03 

CHAR  COUNT  FOR  MNEMONIC  PRINT 

F8E5: 

CO  04 

CPY 

#$04 
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90  F2 

68 

A8 

B9  CO  F9 
85  2C 
B9   00  FA 
85  2D 
A9  00 
AO  05 
06  2D 
26  2C 
2A 
88 

DO  F8 
69  BF 
20  ED  FD 
CA 

DO  EC 
20  48  F9 
A4  2F 
A2  06 
EO  03 
FO  1C 
06  2E 
90  OE 
BD  B3  F9 
20  ED  FD 
BD  B9  F9 
FO  03 
20  ED  FD 
CA 

DO  E7 

60 

88 

30  E7 

20  DA  FD 
A5  2E 
C9  E8 
Bl  3A 
90  F2 
20  56 
AA 
E8 

DO  01 

C8 

98 

20  DA  FD 
8A 

4C  DA 


PRMNl 
PRMN2 


PRADRl 
PRADR2 


PRADR  3 
PRADR 4 
PRADR5 


A2  03 
A9  AO 
20  ED  FD 
CA 

DO  F8 
60 
38 
A5 
A4 
AA 

10  01 
88 

65  3A 
90  01 
C8 
60 


F9  RELADR 


PRNTYX 
PRNTAX 
PRNTX 

PPBLNK 

PRBL2 

PP8L3 


FD 


2F 
3B 


F962:   04  20  54 
F965:   30  OD 
F967:   80  04  90 
F96A:   03  22 
F96C:   54  33  OD 
F96F:   80  04 
F971:   90  04  20 
F974:  54  33 
F976:  OD  80  04 
F979:  90  04 
F97B:   20  54  3B 
F97E:   OD  80 
F980:   04  90  00 
F983:   22  44 
F985:   33  OD  C8 
F988:   44  00 


PC  AD  J 
PCADJ2 
PC AD J 3 


PCADJ4 

RTS2 
* 

* 

FMT1 


BCC  PRNTBL 
PLA 
TAY 

LDA  MNEML,Y 

STA  LMNEM 

LDA  MNEMP , Y 

STA  RMNEM 

LDA  #$00 

LDY  #$05 

ASL  RMNEM 

ROL  LMNEM 

ROL  A 
DEY 

BNE  PRMN2 

ADC  #$BF 

JSR  COUT 
DEX 

BNE  PRMNl 

JSR  PRBLNK 

LDY  LENGTH 

LDX  #$06 

CPX  #$03 

BEQ  PRADR  5 

ASL  FORMAT 

BCC  PRADR3 

LDA  CHAR1-1,X 

JSR  COUT 

LDA  CHAR2-lfX 

BEQ  PRADR  3 

JSR  COUT 
DEX 

BNE  PRADRl 

RTS 

DEY 

BKI  PRADR2 

JSR  PR  BYTE; 

LDA  FORMAT 

CMP  #$E8 


RECOVER  MNEMONIC  INDEX 


FETCH   3-CHAP  MNEMONIC 
(PACKED  IN  2-BYTES) 


SHIFT  5  BITS  OF 
CHARACTER  INTO  A 
(CLEARS  CARRY) 


ADD     ?  OFFSET 
OUTPUT  A  CHAR  OF  MNEM 


OUTPUT  3  BLANKS 
CNT  FOR  6  FORMAT  BITS 
IF  X=3  THEN  ADDR. 


.nr     f9&0  HANDLE  REL  ADR  MODE 

LDA  (PCL),Y  SPECIAL  (PRINT  TARGET , 
BCC     PRADR 4  MOT  OFFSET) 


JSR  PCADJ3 

TAX 

INX 

BNE  PRNTYX 

INY 

TYA 

JSR     PR BYTE 
TXA 

JMP  PR3YTE 
LDX     #$0  3 
LDA  #$A0 
JSR  COUT 
DEX 

BNE  PR3L2 

RTS 

SEC 

LDA  LENGTH 
LDY  PCH 
TAX 

BPL  PCADJ4 
DEY 

ADC  PCL 
BCC     RTS  2 
INY 
RTS 

FMT1  BYTES: 

IF  Y=0 

IF  Y=l 


PCL,PCH+OFFSET+l  TO  A, Y 
+1  TO  Y,X 


OUTPUT  TARGET  ADR 
OF  BRAMCH  AND  RETURN 

BLANK  COUNT 
LOAD  A  SPACE 
Ol'TPUT  A  BLANK 

LOOP  UNTIL  COUNT=0 

0=1-3YTE,1=2-BYTE, 
2=3-BYTE 

TEST  DISPLACEMENT  SIGN 

(FOR  REL  BRANCH) 
EXTEND  NEG  BY  DECR  PCH 

PCL+LENGTH (OR  DISPL) +1  TO  A 
CARRY  INTO  Y  (PCH) 

XXXXXXYO  INSTRS 
THEN  LEFT  HALF  BYTE 
THEN  RIGHT  HALF  BYTE 
(X=INDEX) 


DFB  $04, $20, $54, $30,$0D 

DFB  $80, $04, $90, $03, $22 

DFB  $54,$33,$OD,$80,$04 

DFB  $90,$04,$20,$54p$33 

DFB  $OD,$80,$'>4,$90,$04 

DFB  $20, $54, $3B,$0D,$8O 

DFB  $04, $90, $00, $22, $44 

DFB  $33,$0D,$C8, $44, $00 
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F98A:  11 

22 

44 

F98D:  33 

OD 

F98F:  C8 

44 

A9 

F992:  01 

22 

F994« 

44 

33 

OD 

F997: 

80 

04 

F999' 

90 

01 

22 

F99C« 

44 

33 

F99E 

0D 

80 

04 

F9A1 

90 

F9A2:  26 

31 

87 

F9A5:  9A 

F9A6 

.  00 

FMT2 

F9A7 

21 

F9A8 

81 

F9A9 

82 

F9AA 

>  00 

F9AB 

:  00 

F9AC 

:  59 

F9AD:  4D 

F9AE 

:  91 

F9AF 

:  92 

F9B0 

:  8C 

F9B1 

:  4A 

F9B2 

t  85 

F9B3 

:  9D 

F9B4 

:  AC 

A9 

AC 

A3 

A8 

A4 

CHARl 

F9BA:  D9 

00 

D8 

F9BD:  A4 

A4 

00 

CHAR2 

*CHAR2: 


* 

* 
* 
* 


F9C0: 

1C 

8A 

1C 

F9C3: 

23 

5D 

8B  MNEML 

F9C6 1 

IB 

Al 

9D 

F9C9: 

8A 

ID 

23 

F9CC ! 

9D 

8B 

ID 

F9CFJ 

Al 

00 

29 

F9D2 

19 

AE 

69 

F9D5 

A8 

19 

23 

F9D8 

24 

53 

IB 

F9DB 

:  23 

24 

53 

F9DE 

19 

Al 

F9E0 

!  00 

1A 

5B 

F9E3 

:  5B 

A5 

69 

F9E6 

:  24 

24 

F9E8 

:  AE 

AE 

A8 

F9EB 

:  AD 

29 

00 

F9EE 

:  7C 

00 

F9F0 

:  15 

9C 

6D 

F9F3 

:  9C 

A5 

69 

F9F6 

:  29 

53 

F9F8:  84 

13 

34 

F9FB 

i  11 

A5 

69 

F9FE 

:  23 

AO 

FAOO 

:  D8 

62 

5A 

FA03 

:  48 

26 

62  MNEMR 

FA06 

i  94 

88 

54 

FA09 

:  44 

C8 

54 

FAOC 

:  68 

44 

E8 

FAOF 

:  94 

00 

B4 

FA12 

:  08 

84 

74 

FA15 

:  B4 

28 

6E 

FA18 

:  74 

F4 

CC 

FA1B 

:  4A 

72 

F2 

FA1E 

:  A4 

8A 

FA20 

:  00 

AA 

A2 

FA23 

'  A2 

74 

74 

FA26 

74 

72 

FA28 

44 

68 

B2 

FA2B: 

32 

B2 

00 

FA2E: 

22 

00 

FA30: 

1A 

1A 

26 

FA33  J 

26 

72 

72 

FA36i 

88 

C8 

FA38: 

C4 

CA 

26 

FA3B: 

48 

44 

44 

FA3E: 

A2 

C8 

DFB  $11, S22,$44,$33,$0D 

DFB  $C8,$44,$A9,S01,$22 

DFB  $44, $33, $0D,$80,S04 

DFB  $90,$01,$22,$44,$33 

DFB  $0D,$80,$04,$90 

DFB  $26,$31,$P7,$9A  ZZXXXY01  INSTR'S 


DFB 

$00 

ERR 

DFB 

$21 

IMM 

DFB 

$81 

Z-PAGE 

DFB 

$82 

ABS 

DFB 

$00 

IMPLIED 

DFB 

$00 

ACCUMULATOR 

DFB 

$59 

(ZPAG,X) 

DFB 

$4D 

(ZPAG) ,Y 

DFB 

$91 

ZPAG, X 

DFB 

$92 

ASS,X 

DFB 

$86 

ABS ,  Y 

DFB 

$4A 

(ABS) 

DFB 

$85 

ZPAG,Y 

DFB 

$9D 

RELATIVE 

ASC  ",),#($'• 

DFB  $D9,$00,$D8,$A4,$A4,$00 

"Y%0,"X$$",0 

MNEML  IS  OF  FORM : 

(A)  XXXXXOOO 

(B)  XXXYY100 

(C)  1XXX1010 

(D)  XXXYYY10 

(E)  XXXYYY01 
(X=IMDEX) 

DFB  $1C,S8A,$1C,$23,$5D,$8B 

DFB  $1B, $A1,$9D,S8A,$1D,$23 

DFB  $9D,$8B, $10 , $A1 , $00 , $29 

DFB  $19,$AE,$69,$A8,$19,$23 

DFB  $24, $53, $1B, $23, $24, $53 

DFB  $19,$A1      (A)    FORMAT  ABOVE 

DFE  $00,$1A,$5B,$5B,$A5,S69 

DFB  $24, $24      (B)  FORMAT 

DFB  $AE,$AE,$A8,$AD,$29,$00 

DFB  $7C,$00      (C)  FORMAT 

DFB  $15,$9C,$6D,$9C,$A5,$69 

DFE  $29, $53      CD)  FORMAT 

DFB  $84,$13,$34,$11,$A5,$69 

DFB  $23,$A0      (E)  FORMAT 

DFB  $D8,$62,$5A,$4  8, $26, $62 

DFB  $94, $88, $54, $44, $C8, $54 

DFB  $68,$4  4,$E8,$94,$00,$B4 

DFB  $08, $84, $74, $B4,$28,$6E 

DFB  S74,$F4,$CC,$4A, $72,$F2 

DFB  $A4,$8A      (A)  FORMAT 

DFB  $00,$AA,$A2,$A2,$74,$74 

DFB  $74, $72      (B)  FORMAT 

DFB  $4  4,$68,$B2,$3  2r$B2f $00 

DFB  $22, $00      (C)  FORMAT 

DFB  S1A,$1A,$?6,$26,$72,$72 

DFB  $88,$C8      (D)  FORMAT 

DFB  $C4,$CA,$26,S4&,$44,S44 

DFB  SA2,$C8      (E)  FORMAT 
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FA40 

:  FF 

FF 

FF 

DFB 

$FF , $FF , $FF 

FA43 

:  20 

DO 

F8 

STEP 

JSR 

INSTD5P 

DISASSEMBLE  ONE  INST 

PA  A  A 

:   6  8 

PL  A 

AT  (PCL,H) 

FA47 

:  85 

2C 

STA 

RTNL 

ADJUST  TO  USER 

FA49 

:  68 

PLA 

STACK.  SAVE 

FA4  A 

:  85 

2D 

STA 

PTNH 

RTM  ADR. 

FA4C 

\  A2 

08 

LDX 

#S08 

FA4E 

:  BD 

10 

FB 

XOINIT 

LDA 

IMIT9L-1 

,X   INIT  XEO  AREA 

FA  51 

:  95 

3C 

STA 

XQT,X 

FA53 

:  CA 

DEX 

FA  5  4 

:  DO 

F8 

BNE 

XOINIT 

FA56 

:  Al 

3A 

LDA 

(PCL,X) 

USER  OPCODE  BYTE 

FA5  8 

:  FO 

42 

BEQ 

XBRK 

SPECIAL  IF  BREAK 

FA5A 

:  A4 

2F 

LDY 

LENGTH 

LEN   FROM  DISASSEMBLY 

PA  t/? 

r  t\  DVi. 

20 

CMP 

#$20 

HANDLE  JSR,    PTS ,   JMP , 

FA5E 

:  FO 

59 

BEG 

XJSR 

FA60 

:  C9 

60 

CMP 

tt$60 

JMP    (    ) ,    RTI  SPECIAL 

FA6  2 

:  FO 

45 

BEQ 

XRTS 

FA64 

:  C9 

4C 

CMP 

#$4C 

FA66 

:  FO 

5C 

3  EC 

xj:*p 

FA  6  8 

:  C9 

6C 

CMP 

#$6C 

FA6A 

:  FO 

59 

BEQ 

XJMFAT 

FA6C 

:  C9 

40 

Cvip 

#$40 

FA6E 

:  FO 

35 

BEQ 

XRTI 

FA70 

:  29 

IF 

AND 

*$1F 

FA72 

:  49 

14 

EOR 

#S14 

FA74 

:  C9 

04 

CMP 

#S04 

COPY  USSR   INST  TO  XEO  AREA 

FA76 

:  FO 

02 

BEQ 

XQ2 

WITH  TRAILING  NOPS 

FA78 

:  Bl 

3A 

XQ1 

LDA 

(PCL) fY 

CHANGE  REL  BRANCH 

FA  7  A 

.  QO 

•  '7 

3C 

00 

XQ2 

STA 

XQTN2 , Y 

DISP  TO  4  FOR 

FA7D 

:  88 

DEY 

JMP  TO  BRANCH  OR 

FA7E 

:  10 

F8 

BPL 

XQ1 

NBRANCH   FROM  XEQ. 

FA  80 

:  20 

3F 

FF 

JSR 

RESTORE 

RESTORE  USER  REG  CONTENTS. 

FA8  3 

:  4C 

3C 

00 

JMP 

XQTNZ 

XEQ  USER  OP  FROM  RAM 

FA86 

:  85 

45 

IRQ 

STA 

ACC 

(RETURN  TO  NBRANCH) 

FA  8  8 

:  68 

PLA 

FA89 

:  48 

PHA 

**IRQ  HANDLER 

FA8A 

:  OA 

ASL 

A 

FA8B 

:  OA 

ASL 

FA8C 

:  OA 

ASL 

A 

FA8D 

:  30 

03 

BMI 

BREAK 

TEST  FOR  BREAK 

FA8F 

:  6C 

FE 

03 

JMP 

( IRQLOC) 

USER  ROUTINE  VECTOR  IN  RAM 

FA92 

:  28 

BREAK 

PLP 

FA93 

:  20 

4C 

FF 

JSR 

SAV1 

SAVE  REG'S  ON  BREAK 

FA96 

:  68 

PLA 

INCLUDING  PC 

FA97 

:  85 

3A 

STA 

PCL 

FA99 

:  68 

PLA 

FA9A 

:  85 

3B 

STA 

PCH 

FA9C 

:  20 

82 

F8 

XBRK 

JSR 

INSDS1 

PRINT  USER  PC. 

FA9F 

:  20 

DA 

FA 

JSR 

RGDSPl 

AND  REG'S 

FAA2 

:  4C 

65 

FF 

JMP 

MON 

GO  TO  MONITOR 

FAA5 

:  18 

XRTI 

CLC 

FAA6 

:  68 

PLA 

SIMULATE   RTI   BY  EXPECTING 

FAA7 

:  8  5 

48 

STA 

STATUS 

STATUS  FROM  STACK ,   THEN  RTS 

FA  A  9 

:  68 

XRTS 

PLA 

PTS  SIMULATION 

FAAA 

85 

3A 

STA 

PCL 

EXTRACT  PC  FROM  STACK 

FAAC 

68 

PLA 

AND  UPDATE   PC  BY  1    ( LEN=0 ) 

FAAD 

85 

3B 

PCINC2 

STA 

PCH 

FAAF 

A5 

2F 

PC INC  3 

LDA 

LENGTH 

UPDATE   PC  BY  LEN 

FAB1 

:  20 

56 

F9 

JSR 

PC AD J 3 

FAB  4 

84 

3B 

STY 

PCH 

FAB  6 

18 

CLC 

FAB7 

90 

14 

BCC 

NEW PCL 

FAB9 

18 

XJSR 

CLC 

FABA 

20 

54 

F9 

JSR 

PC AD J 2 

UPDATE   PC  AND  PUSH 

FABD 

AA 

TAX 

ONTO  STACK  FOR 

FABE 

98 

TYA 

JSR  SIMULATE 

FABF 

48 

PHA 

FACO 

8A 

TXA 

FAC1 

48 

PHA 

FAC2 ' 

AO 

02 

LDY 

#$02 

FAC4 

18 

XJMP 

CLC 

FAC5 : 

Bl 

3A 

XJMPAT 

LDA 

(PCL) ,Y 

FAC7- 

AA 

TAX 

LOAD  PC  FOR  JMP, 

FAC8- 

88 

DEY 

(JMP)  SIMULATE. 

FAC9: 

Bl 

3A 

LDA 

( PCL) ,Y 

FACB: 

86 

3B 

STX 

PCH 

FACD: 

85 

3A 

NEWPCL 

STA 

PCL 

FACF: 

BO 

F3 

BCS 

XJMP 

FAD1: 

A5 

2D 

RTNJ.1P 

LDA 

RTNH 

FAD3: 

48 

PHA 

FAD4 : 

A5 

2C 

LDA 

RTNL 

FAD6: 

48 

PHA 

FAD7 : 

20 

8E 

FD 

REGDSP 

JSR 

CROUT 

DISPLAY  USER  REG 

FADA: 

A9 

45 

RGDSPl 

LDA 

'#ACC 

CONTENTS  WITH 

FA  DC: 

85 

40 

STA 

A3L 

LABELS 

81 


FADE: 

A9  0  0 

LDA 

FAEO : 

85  41 

STA 

FAE2 : 

A  O  PH 

Az   r  B 

LDX 

FAE4: 

A9  AO 

enco  1 
KUbr  1 

LDA 

FAE6: 

20  ED  FD 

JSR 

FAE9 : 

on    1c  PA 
Ou   1 "A 

LDA 

FAEC : 

on    rn  on 
zU  bU   r L> 

JSR 

FAEF: 

A9  BD 

LDA 

FAFl : 

zU   blJ  ru 

JSR 

FAF4: 

B5  4A 

LDA 

FAF6 : 

o  n   t\&  pn 
Z  U    LJA   r  U 

JSR 

FAF9 : 

P  o 
CO 

INX 

FA  FA: 

30  E8 

BMI 

FAFC : 

60 

RTS 

FAFD: 

CLC 

FAFE: 

AO  01 

LDY 

FBOO : 

Bl   3  A 

LDA 

FB02 : 

on    cc  pQ 
4.\J    do  n 

JSR 

FB05: 

85  3A 

STA 

FB07: 

98 

TYA 

FB08 : 

O  Q 

Jo 

SEC 

FB09 : 

B0  A2 

3CS 

FBOB: 

20   4 A  Fr 

JSR 

FBOE : 

1  Q 

Jo 

SEC 

FBOF: 

B0  9E 

PCS 

FBll : 

EA 

lNllDb 

NOP 

FBI  z : 

p  a. 

DA 

NOP 

FBI  3: 

4C  0B  FB 

JMP 

FB16: 

4C   FD  rA 

JNJP 

FB19 : 

CI 

RTBL 

DFB 

FB1A: 

D8 

DFB 

FB1B: 

D9 

DFE 

FBlC : 

DO 

DFB 

FB1D: 

D3 

DFB 

FBlE: 

AD  70  CO 

"Do  p  a  n 
c  is  t  a  u 

LDA 

FB21 : 

AO  00 

LDY 

FB23 : 

EA 

NOP 

FB24  4 

EA 

NOP 

FB25 

BD  b 4  lu 

PREAQ2 

LDA 

FB28 

10  04 

BPL 

FB2A 

C8 

INY 

FB2B 

DO  F8 

BNE 

FB2D 

.  88 

DEY 

FB2E 

:  60 

dtc  on 

RTS 

FB2F 

:  A9  0  0 

INIT 

LDA 

FB31 

:   85  48 

STA 

FB33 

:  AD  bb 

LDA 

FB36 

:  au  Di 

LDA 

FB39 

:   AD  51  CO 

S  ETTXT 

LDA 

FB3C 

:  A9  00 

LDA 

FB3E 

;    rU  Ud 

BEO 

FB40 

:   AD  50  CO 

C  P  TP  D 

LDA 

FB43 

:   AD  53  CO 

LDA 

FB46 

o  n    i  £    v  fl 
:    zU    Jo  co 

JSR 

FB49 

:   A9  14 

LDA 

FB4B 

:   85  22 

C  P  T*  t*T  kj  n 
t3  L  1  W  IN  LI 

STA 

FB4D 

:   A9  0 0 

LDA 

FB4F 

:   85  20 

STA 

FB51 

:  A9  28 

LDA 

FB53 

Q  C       O  1 

:   b d  zi 

STA 

FB55 

:   A9  18 

LDA 

FB57 

:   85  23 

STA 

FE59 

:  Ay  l  / 

LDA 

FB5B 

:   85  25 

lAbv 

STA 

FB5D 

An    o  o  or 
:    4C  tl 

JMP 

FB60 

on    a  >i  PR 
:    Z  U   A  H    r  ri 

vl  U  Li  .r ' 

JSP 

FB63 

:   AO  10 

LDY 

FB65 

:   A5  50 

1MU  LZ 

LDA 

FB67 

:   4  A 

LSR 

FB68 

:   9  0  0C 

PCC 

FB6A 

:  18 

CLC 

F86B 

.     *  o    p  p 
;    Az   r  t, 

LDX 

FB6D 

:   35  54 

n  U  Li  J 

LDA 

FB6F 

:   7  5  56 

ADC 

FB71 

:   y  b 

STA 

FB7: 

:  EH 

INX 

FB74 

:   DO  F7 

3NF 

FB76 

ao  no 
;    Az    U  j 

.1 U  L)  *+ 

LDX 

FE78 

:  76 

m  r  i  r  ^ 
nULD 

DFB 

F379 

:  50 

DFB 

FB7A 

:  CA 

DEX 

FB7E 

:    10  F  E 

•3  PL 

FB7T 

>:    8  8 

pf  y 

FB7E 

:   DO  E 5 

BME 

root 

Z  DU 

RTS 

#ACC/256 

A3H 

#$FB 

#$A0 

COUT 

RTBL-SFB , X 

COUT 

#$3D 

COUT 

ACC+5,* 

PRBYTE 


RDSPl 


#$01 
(PCL) ,Y 
PCADJ3 
PCL 


PCINC2 
SAVE 

PCINC3 


MBRNCH 

BRANCH 

SCI 

$D8 

$D9 

$D0 

$D3 

PTPIG 

#$00 


BRANCH  TAKEN , 

ADD  LEN+2  TO  PC 


NORMAL  RETURN  AFTER 
XEQ  USER  OF 
GO  UPDATE  PC 

DUMMY  FILL  FOR 
XEO  AREA 


TRIGGER  PADDLES 
INIT  COUNT 

COMPENSATE   FOR  1ST  COUNT 


PADDL0  r X  COUNT  Y-PEG  EVERY 
RTS  2D  12  USEC 


PREAD2 


#$00 

STATUS 

LORES 

LOWSCR 

TXTSET 

#500 

SETWND 

TXTCLR 

MIXSET 

CLPTOP 

#$14 

WNDTOP 

#$00 

WNDLFT 

#$28 

WNDWDTH 

#$18 

WNDBTM 

#$17 

CV 

VTAB 

mi 

#$10 

ACL 

A 

MUL4 

#$FE 
XTNDL+2 
AUXL+2, 
XTNDL+2 

'■1UL3 
#S03 
#$76 
#$50 

MUL5 
MUL2 


EXIT  AT  255  MAX 


CLR  STATUS   FOP  DEBUG 
SOFTWARE 

INIT  VIDEO  MODE 
SET  FOR  TEXT  MODE 
FULL  SCREEN  WINDOW 

SET  FOR  GRAPHICS  MODE 
LOWER   4   LINES  AS 
TEXT  WINDOW 

SET  FOP   40  COL  WINDOW 
TOP   IN  A -REG , 
BTTM  AT  LINE  24 


VTAB  TO  ROW  23 

VTABS  TO  ROW  IN  A-REG 

A3S  VAL  OF  AC  AUX 
INDEX  FOR  16  BITS 
ACX   «  AUX  +  XTND 

TO  AC,  XTND 
IF   NO  CARRY  , 
NO  PARTIAL  PROD. 

fX  ADD  MPLCND  (AUX) 
X     TO  PARTIAL  PROD 
,X  (XTND). 
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FB81 

:  20 

A4 

FB 

DIVPM 

JSR 

*D1 

ARS  VAL  OF  AC,  AUX. 

FB84 

:  AO 

10 

DIV 

LDY 

mo 

INDEX   FOR   16  BITS 

FB66 

:  06 

50 

DIV2 

ASL 

ACL 

FB88 

:  26 

51 

ROL 

ACH 

FB8A 

:  26 

52 

ROL 

XTNQL 

rTHO/AUX 

FB8C 

:  26 

53 

ROL 

XTNDH 

TO  AC. 

FB8E 

:  38 

SEC 

FB8F 

:  A5 

52 

LDA 

XTNOL 

FB91 

:  F5 

54 

sec 

AUXL 

MOD  TO  XTND. 

FB93 

:  AA 

TAX 

FB94 

:  A5 

53 

LDA 

XTNDR 

F396 

:  E5 

55 

SBC 

AUXH 

FB98 

:  90 

06 

BCC 

DIV3 

FB9A 

:  86 

52 

STX 

XTNDL 

F39C 

:  85 

53 

ST  A 

XT'JDH 

FB9E 

:  E6 

50 

INC 

ACL 

FBAO 

:  88 

DIV3 

DEY 

FBAl 

:  DO 

E3 

BNE 

DIV2 

FBA3 

:  60 

RTS 

FBA4 

:  AO 

00 

MD1 

LDY 

#$00 

F BS  VAL  OF  AC,  AUX 

FBA6 

:  84 

2F 

STY 

SIGN 

WITH  RESULT  SIGN 

FBA8 

:  A2 

54 

LDX 

#AUXL 

IN  LSB  OF  SIGN. 

FBAA 

:  20 

AF 

FE 

JSR 

MD2 

FBAD 

:  A2 

50 

LDX 

#ACL 

FBAF 

:  B5 

01 

MD2 

LDA 

LOCI , X 

X  SPECIFIES  AC  OR  AUX 

FB31 

:  10 

OD 

BPL 

MDRTS 

FBB3 

:  38 

SEC 

FBB4 

:  98 

MD3 

TYA 

FBB5 

:  F5 

00 

SBC 

LOC0,X 

COMPL  SPECIFIED  REG 

FBB7 

:  95 

00 

STA 

LOC0,X 

IF  NEG • 

FBB9 

:  98 

TYA 

FBBA 

:  F5 

01 

SBC 

L0C1,X 

FBBC 

:  95 

01 

STA 

L0C1,X 

FBBE 

:  E6 

2F 

INC 

SIGN 

FBCO 

:  60 

MDPTS 

RTS 

FBC1 

:  48 

BASCALC 

PHA 

CALC  BASE  ADR  IN  BASL, H 

FBC2 

:  4A 

LSR 

A 

FOR  GIVEN  LINE  NO. 

FBC3 

:  29 

03 

AND 

#$03 

0<=LINE  NO.<=$17 

FBC5 

:  09 

04 

OFA 

#$04 

AFG=000A3CDE,  GENERATE 

FBC7 

:  85 

29 

STA 

BASH 

BASH^POOOOICD 

FBC9 

:  68 

PLA 

AND 

FBCA 

:  29 

18 

AND 

#$18 

BA3L=EABAB0O0 

FBCC 

90 

02 

BCC 

6SCLC2 

FBCE 

69 

7F 

ADC 

#$7F 

FBDO: 

85 

28 

3SCLC2 

STA 

BASL 

FBD2: 

OA 

ASL 

A 

FBD3 ' 

OA 

ASL 

A 

FBD4  J 

05 

28 

OR  A 

BASL 

FBD6: 

85 

28 

STA 

BASL 

FBD8: 

60 

RTS 

FBD9: 

C9 

87 

BELLI 

CMP 

#$8  7 

BELL  CHAR?  (CNTRL-G) 

FBDB, 

DO 

12 

3NE 

RTS2B 

NO, RETURN 

FBDD: 

A9 

40 

LDA 

#$40 

DELAY   .01  SECONDS 

F8DF: 

20 

A8 

FC 

JSP 

WAIT 

FBE2: 

AO 

CO 

LDY 

#sco 

FBE4: 

A9 

OC 

BELL2 

LDA 

#$oc 

TOGGLE  SPEAKER  AT 

FBE6: 

20 

A8 

FC 

JSR 

WAIT 

1  KHZ   FOP    .1  SEC . 

FBE9: 

AD 

30 

CO 

LDA 

SPKR 

F3EC: 

88 

DEY 

FBED: 

DO 

F5 

SNE 

PELL2 

F3EF: 

60 

RTS  2? 

RTS 

F8FO: 

A4 

24 

STOADV 

LDY 

CH 

CURSER  H  INDEX  TO  Y-REG 

FBF2: 

91 

28 

STA 

(  E ASL)  ,Y 

STOP  CHAR  IN  LINE 

FBF4: 

E6 

24 

ADVANCE 

IMC 

CH 

INCREMENT  CURSER  H  INDEX 

FBF6 : 

A5 

24 

LDA 

Cfi 

(MOVE  RIGHT) 

F6F8 : 

C5 

21 

CMP 

WNDWDTH 

BEYOND  WINDOW  WIDTH? 

FBFA: 

BO 

66 

BCS 

CR 

YES         TO  NEXT  LINE 

FBFC: 

60 

RTS  3 

RTS 

NO, RETURN 

FBFD: 

C9 

AO 

VIDOUT 

CMP 

#$AO 

CONTROL  CHAR? 

FBFF: 

BO 

EF 

BCS 

STOADV 

NO , OUTPUT  IT. 

FCOl: 

A8 

TAY 

INVERSE  VIDEO? 

FC02: 

10 

EC 

3PL 

3TOADV 

YES,   OUTPUT  IT. 

FC04: 

C9 

8D 

CMP 

#$8D 

CR? 

FC06: 

FO 

5A 

3Ep 

CR 

YES. 

FC08: 

C9 

6A 

CtfP 

#$8A 

LINE  FEED? 

FCOA: 

FO 

5A 

BEO 

LF 

IF  SO,    DO  IT. 

FCOC: 

C9 

88 

CMP 

#$S8 

BACK  SPACE?    (CNTRL-H ) 

FCOE: 

DO 

C9 

bne 

BELLI 

MO,   CHECK  FOR  BELL. 

FCIO: 

C6 

24 

BS 

DEC 

CH 

DECREMENT  CURSER  H  INDEX 

FC12: 

10 

E8 

BPL 

RTS  3 

IF  POS,   OK.    ELSE  MOVE  UP 

FC14: 

A5 

21 

LDA 

WNDWDTH 

SFT  CH  TO  WNDNDTH-1 

FC16: 

85 

24 

STA 

CH 

FC18: 

C6 

24 

DEC 

CH 

(RIGHTMOST  SCREEN  POS) 

FC1A: 

A5 

22 

UP 

LDA 

WNDTOP 

CURSER  V  INDEX 

FC1C: 

C5 

25 

CMP 

CV 
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FC1E: 

BO 

OB 

BCS 

FC20: 

C6 

25 

DEC 

FC22: 

A5 

25 

VTAB 

LDA 

FC24: 

20 

CI 

FB 

VTABZ 

JSP 

FC27: 

65 

20 

ADC 

FC29: 

85 

28 

3TA 

FC2B: 

60 

PTS4 

PTS 

FC2C: 

49 

CO 

ESC1 

EOR 

FC2E: 

FO 

28 

BFO 

FC30: 

69 

FD 

ADC 

FC32: 

90 

CO 

BCC 

FC34: 

FO 

DA 

8EO 

FC36: 

69 

FD 

ADC 

FC38: 

90 

2C 

3CC 

FC3A: 

FO 

DE 

BEQ 

FC3C: 

69 

FD 

ADC 

FC3E 

90 

5C 

BCC 

FC40 

DO 

E9 

3NE 

FC42 

A4 

24 

CLREOP 

LDY 

FC44 

A5 

25 

LDA 

FC46 

48 

CLE0P1 

PHA 

FC47 

20 

24 

FC 

JSP 

FC4A 

20 

9E 

FC 

JSP 

FC4D: 

AO 

00 

LDY 

FC4F- 

68 

PLA 

FC50 

69 

00 

ADC 

FC52 

C5 

23 

CMP 

FC54 

90 

FO 

BCC 

FC56 

BO 

CA 

BCS 

FC58 

.  A5 

22 

HOME 

LDA 

FC5A 

:  85 

25 

ST  A 

FC5C 

:  AO 

00 

LDY 

FC5E 

:  84 

24 

STY 

FC60 

:  FO 

E4 

3E0 

FC62 

:  A9 

00 

CP 

LDA 

FC64 

:  85 

24 

STA 

FC66 

:  E6 

25 

LF 

INC 

FC68 

:  A5 

25 

LDA 

FC6A 

:  C5 

23 

CMP 

FC6C 

:  90 

B6 

P>CC 

FC6E 

:  Cb 

25 

DEC 

FC70 

:  A5 

22 

SCROLL 

LDA 

FC72 

:  48 

PHA 

FC73 

:  20 

24 

FC 

JSP 

FC76 

:  A5 

28 

SCRLl 

LDA 

FC78 

i  85 

2A 

STA 

FC7A 

:  A5 

29 

LDA 

FC7C 

:  85 

2B 

STA 

FC7E 

:  A4 

21 

LDY 

FC80:  88 

DEY 

FC81 

:  68 

FLA 

FC82 

:  69 

01 

ADC 

FC84 

:  C5 

23 

CMP 

FC86 

:  BO 

OD 

BCS 

FC88 

:  48 

PHA 

FC89 

:  20 

24 

FC 

JSP 

FC8C 

:  Bl 

28 

SCRL2 

LDA 

FC8E 

:  91 

2A 

STA 

FC90 

:  88 

DEY 

FC91 

:  10 

F9 

BPL 

FC93 

:  30 

El 

BMI 

FC95 

:  AO 

00 

SCRL3 

LDY 

FC97 

:  20 

9E 

FC 

JSR 

FC9A 

:  BO 

86 

3CS 

FC9C 

:  A4 

24 

CLREOL 

LDY 

FC9E 

:  A9 

AO 

CLEOLZ 

LDA 

FCAO 

:  91 

28 

CLFOL2 

STA 

FCA2 

:  C8 

I  NY 

FCA3 

:  C4 

21 

CPY 

FCA5 

:  90 

F9 

BCC 

FCA7 

:  60 

RTS 

FCA8 

:  38 

WAIT 

SEC 

FCA9 

:  48 

WAIT  2 

PHA 

FCAA 

:  E9 

01 

WA  IT  3 

3  PC 

FCAC 

:  DO 

FC 

PNE 

FCAE 

:  68 

PLA 

FCAF 

:  E9 

01 

SBC 

FCB1 

:  DO 

F6 

BNE 

FCB3 

:  60 

PTS 

FCB4 

:  E6 

42 

NXTA4 

INC 

FCB6 

:  DO 

02 

PME 

FCB8 

:  E6 

43 

I^C 

FC6A 

:  A5 

3C 

NXTAl 

LDA 

FCBC 

:  C5 

3E 

CMP 

FC6E 

:  A5 

3D 

LDA 

RTS4  IF  TOP  LINE  THEN  PET URN 

CV  DECK  CURSER  V-INDEX 

CV  GET  CURSER  V-INDEX 

PASCALC  CENEPATE  BASE  ADDR 

WMDLFT  ADD  WINDOW  LEFT  INDEX 

BASL  TO  BASL 

#$C0  ESC? 

HOME  IF  SO,    DO  HOME  AND  CLEAR 

#$FD  ESC-A  OR   B  CHECK 

ADVAMCF  Af  ADVANCE 

BS  B,  BACKSPACE 

#SFD  ESC-C  OR  D  CHECK 

LF  C,DOWN 

UP  D,   GO  UP 

#$FD  ESC-E  OP  F  CHECK 

CLREOL  E ,   CLEAR  TO  END  OF  LINE 

T?TS*  NOT   F,  RETURN 

CH  CURSOR  H  TO  Y  INDEX 

CV  CURSOR  V  TO  A-REGISTER 

SAVE  CURRENT  LINE  ON  STK 

VTA8Z  CALC  RASE  ADDRESS 

CLEOL?  CLEAR  TO  EOL ,   SET  CARRY 

#$00  CLEAR   F"OM  H   INDEX=0  FOR  PEST 

INCREMENT  CURRENT  LINE 

#$00  (CARRY  IS  SET) 

■VND8TM  DONE  TO  BOTTOM  OF  WINDOW? 

CLEOP1  NC,    KEEP  CLFAPING  LINES 

VTAB  YES  t   TAB  TO  CURRENT  LINE 

WNDTOP  I NIT  CURSOR  V 

CV  AN 0  H-INDICES 
#$00 

CH  THEN  CLEAR  TO  END  OF  PAGE 
CLEOP1 

#$00  CURSOR  TO  LEFT  OF  INDFX 

CH  (PET  CURSOR  H=0) 

CV  INCR  CURSOR  V(DOhrN   1  LINE) 

CV 

tfNDPTM  OFF  SCREFi\T? 

VTARZ  NO,    SET   BASE  ADDR 

CV  DECR  CURSOR  V(BACK  TO  30TTOM  LIMft.) 

WNDTOP  START  AT  TOP  OF  SCPL  WNDW 

VTARZ  GENERATE  BASE  ADDRESS 

BASL  COPY  BASL, H 

BAS2L  TO  BAS2L ,H 

BASH 

BAS2H 

WNDV;OTH  INIT  Y  TO  RIGHTMOST  INDEX 
OF  SCROLLING  WINDOW 

#$01  INCR  LINE  NUMBER 

WNDBTM  DONE? 

SCRL3  YES,  FINISH 

VTABZ  FORM  BASL , H    (BASE  ADDR) 


(BASL) ,Y  MOVE  A  CHR  UP  ON  LINE 
(BAS2L) ,Y 

NEXT  CHAR  OF  LINE 

SCRL2 

SCRL1         NEXT  LINE 

#$00  CLEAR  BOTTOM  LINE 

CLEOLZ       GET  BASE  ADDR  FOR  BOTTOM  LINE 

VTAB  CARRY  IS  SET 

CH  CURSOR  H  INDEX 

#SA0 

( BASL )  , Y  STORE   BLANKS  FROM    1  HERE  1 
TO  END  OF  LINES  (WNDWDTH) 

WNDfTDTH 
CLEOL2 


#$01 

WAIT3         1.0204  USEC 

(13+2712*A+512*A*A) 

#$01 

WAIT  2 

A4L  INCR   2-PYTE  A4 

NXTA1  aND  Al 

A4H 

AIL  INCP   2- BYTE  Al. 

A2L 

A1H  A+3D  COMPARE  TO  A2 
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FCCO 

:  E5 

3F 

SEC 

A2h 

FCC  2 

:  EG 

3C 

INC 

(CARRY   SET   IF  >=) 

FCC  4 

:  DO 

02 

BNE 

RTS4B 

FCC6 

:  E6 

3D 

INC 

A1H 

FCC  8 

:  60 

RTS4B 

RTS 

FCC  9 

:  AO 

43 

HEADR 

LDY 

WRITE  A*256    1  LONG  1' 

FCCB 

:  20 

DS 

FC 

JSP 

ZEPDLY 

HALF  CYCLES 

FCCE 

:  DO 

F9 

3NE 

HEADP 

(6  50  US  EC   EACH  ) 

FCDO 

:  69 

FE 

ADC 

#?FE 

FCD2 

:  EO 

F5 

*CS 

HE  A  DP- 

THEN   A    '  SPORT  0' 

FCD4 

:  AO 

21 

LDY 

U21 

(400  USEC) 

FCD6 

:  20 

DB 

FC 

WRBIT 

JSR 

ZERDLY 

WRITE  TWO  HALF  CYCLES 

FCD9 

:  C8 

INY 

OF  250  USEC  ('0') 

FCDA 

:  C8 

INY 

OR  500  OSEC  ('0') 

FCDB 

:  88 

ZERDLY 

DEY 

FCDC 

:  DO 

FD 

BNE 

ZEROLY 

FCDE 

:  90 

05 

BCC 

WPTAPE 

Y  IS  COUNT  FOR 

FCEO 

:  AO 

32 

LDY 

#532 

TIMING  LOOP 

FCE2 

:  88 

ONEDLY 

DEY 

FCE3 

:  DO 

FD 

BNE 

ONEDLY 

FCE5 

:  AC 

20 

CO  . 

WRTAPE 

LDY 

TAPEOUT 

FCE8 

:  AO 

2C 

LDY 

#S2C 

FCEA 

:  CA 

DEX 

FCEB 

:  60 

RTS 

FCEC 

:  A2 

08 

RDRYTE 

LDX 

#$08 

8   BITS  TO  READ 

FCEE 

:  48 

RDBYT2 

PHA 

READ  TWO  TRANSITIONS 

FCEF 

:  20 

FA 

FC 

JSP 

R02BIT 

(FIND  EDGE) 

FCF2 

:  68 

PLA 

FCF3 

:  2A 

ROL 

A 

NEXT  BIT 

FCF4 

:  AO 

3A 

LDY 

*$3A 

COUNT  FOR  SAMPLES 

FCF6 

:  CA 

DEX 

FCF7 

:  DO 

F5 

BNE 

RDBYT2 

FCF9 

:  60 

RTS 

FCFA 

:  20 

FD 

FC 

RD23IT 

JSR 

RD3IT 

FCFD 

:  88 

■PDPIT 

DEY 

DECR   V  UNTIL 

FCFE 

:  AD 

60 

CO 

LDA 

TAPE  IN 

TAPE  TRANSITION 

FDOl 

:  45 

2F 

EOF 

LAST IN 

FD03 

:  10 

F8 

BPL 

RDBIT 

FD05 

:  45 

2F 

EOR 

LA ST IN 

FD07 

:  85 

2F 

ST  A 

LA ST IN 

FD09 

:  CO 

80 

CPY 

#S80 

SET  CARRY  ON  Y-PEG. 

FDOB 

:  60 

PTS 

FDOC 

:  A4 

24 

SDK  FY 

LDY 

CH 

FDOE 

:  Bl 

28 

LDA 

(PASI.)  ,  Y 

SET  SCREEN  TO  FLASH 

FDIO 

:  48 

PHA 

29  3F 

09  40 
91  28 
68 

6C  38  00 
E6  4E 
DO  02 
E6  4F 
2C  00  CO 

10  F5 
91  28 

AD  00  CO 
2C  10  CO 
60 

20  OC  FD 
20  2C  FC 
20  OC  FD 
C9  93 
FO  F3 
60 

A5  32 
48 

A9  FF 
85  32 
BD  00  02 
20  ED  FD 
68 

85  32 
BD  00  02 
C9  88 
FO  ID 
C9  98 
FO  OA 
EO  F8 
90  03 
20  3A  FF 
E8 

DO  13 
A9  DC 
20  ED  FD 


KEY  IN 


KEY  IN 2 


ESC 

PDCHAR 


NOTCR 


NOTCR1 
CANCEL 


AND 

ORA 

STA 

PLA 

J>UJ 

INC 

BNE 

INC 

BIT 

EPL 

STA 

LDA 

BIT 

RTS 

JSR 

JSR 

JSR 

CilP 

BEO 

RTS 

LDA 

PHA 

LDA 

STA 

LDA 

JSR 

PLA 

STA 

LDA 

CMP 

PEG 

CMP 

PEO 

CPX 

BCC 

JSR 

INX 

BNE 

LDA 

JSR 


#S3F 
#$40 

(BASE) , Y 

(KSWL) 
F.NDL 
KEY IN 2 
RNDH 
K  BD 
K  FY  I M 

(BASL) ,Y 
K.?D 

KPDSTP? 

PDKEY 

ESC1 

RDKEY 

#$95 

ESC 

INVFLG 

#$FF 

INVFLG 

IN,X 

COUT 

INVFLG 
IN,  X 
#$88 
BCK3PC 
#$98 
CANCEL 
#$F8 
NOTCR 1 
BELL 

NXTCHAR 
#$DC 
COUT 


GO  TO  USER  KEY-IN 

INCR   RND  NUMBER 

KEY  DOWN? 
LOOP 

REPLACE   FLASHING  SCREEN 
CET  KEYCODE 
CLP   KEY  STROBE 

GET  FYCODE 

HANDLE   ESC  FUNC. 
READ  KEY 
ESC? 

YES  ,    DON'T  RETURN 


ECHO  USER  LI-NE 
NON  INVERSE 


CHECK   FOR  EDIT  KEYS 
RS,  CTRL-X. 


MARGIN? 

YES,    SOUND  BELL 
ADVANCE   INPUT  INDEX 

BACKSLASH  AFTER  CANCELLED  LINE 
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FD67: 

20 

8E 

FD 

GETLNZ 

JSR 

CROUT 

OUTPUT  CP 

FD6A: 

A5 

33 

GETLN 

LDA 

PROMPT 

FD6C : 

20 

ED 

FD 

J  S R 

COUT 

OUTPUT  PROMPT  CHAR 

FD6F: 

A2 

01 

LDX 

#501 

INIT   INPUT  INDEX 

FD71: 

8A 

BCKSPC 

TXA 

WILL  «ACK3PACE  TO  0 

FD72 : 

FO 

F3 

DEQ 

GETLHZ 

FD74 : 

CA 

DEX 

FD75 : 

20 

35 

FD 

NXTCUAK 

JSP 

RDCriAR 

FD78 : 

C9 

95 

CMP 

#PIC;< 

USE  SCREEN  CHAP 

FD7A: 

DO 

02 

BNE 

CAPTST 

FOP  CTRL-U 

FD7C: 

Bl 

28 

LDA 

(BASL)  ,Y 

FD7E : 

C9 

EO 

CAPTST 

CMP 

*$E0 

FD80: 

90 

02 

3CC 

ADDIMP 

COWVEPT  TO  CAPS 

FD82: 

29 

DF 

AND 

#$DF 

FD84 : 

9D 

00 

02 

ADDIMP 

STA 

IN,X 

ADD  TO   IKPUT  3UF 

FD87: 

C9 

8D 

CMP 

*$8D 

FD89: 

DO 

B2 

BNE 

NOTCR 

FD8B: 

20 

9C 

FC 

JSR 

CLREOL 

CLR  TO  EOL   IF  CR 

FD8E: 

A9 

8D 

CROUT 

LDA 

*$8D 

FD90: 

DO 

5B 

BNE 

COUT 

FD92 : 

A4 

3D 

PPA1 

LDY 

A1H 

PRINT  CR  ,A1    IN  HEX 

FD94 : 

A6 

3C 

LDX 

AIL 

FD96: 

20 

8E 

FD 

PFYX2 

JSR 

CPOUT 

FD99 : 

20 

40 

F9 

JSR 

PR.ITYX 

FD9C: 

AO 

00 

LDY 

#$00 

FD9E: 

A9 

AD 

LDA 

*$AD 

PRltJT 

FDAO : 

4C 

ED 

FD 

J  M  P 

COUT 

FDA3: 

AS 

3C 

XAM  8 

LDA 

AIL 

FDA  5: 

09 

07 

ORA 

*$07 

SET  TO   FINISH  AT 

FDA 7  : 

85 

3E 

STA 

A2L 

MOD  P=7 

FDA 9  : 

A5 

3D 

LDA 

A 1 H 

FDAB: 

85 

3F 

STA 

A2H 

FDAD: 

A5 

3C 

tfOCftCHK 

LDA 

AIL 

FDA  F: 

29 

07 

AMD 

#$07 

FD31 : 

DO 

03 

BNE 

DATA OUT 

FDB3 : 

20 

92 

FD 

XAM 

JSR 

PRA1 

FDB6  : 

A9 

AO 

DATA OUT 

LDA 

#$A0 

FDB8: 

20 

FD 

FD 

JSP 

COUT 

OUTPUT  BLANK 

FD3B: 

Bl 

3C 

LDA 

(AIL) ,Y 

FDBD: 

20 

DA 

FD 

JSP 

PRBYTE 

OUTPUT  BYTE   IN  HEX 

FDCO: 

20 

BA 

FC 

JSR 

NXTAl 

FDC  3 : 

90 

E8 

BCC 

MOD3CHK 

CHECK   IF  TIME  TO, 

FDC5 : 

60 

RTS4C 

RTS 

PRINT  ADDP 

FDC  6: 

4A 

XAMPM 

LSR 

A 

DETERMINE   IF  MOM 

FDC  7 : 

90 

EA 

BCC 

XAM 

MODE   IS  XAM 

FDC  9: 

4A 

LSR 

A 

ADD ,   OR  SUB 

FDCA: 

4A 

LSR 

A 

FDCB : 

A  5 

3E 

LDA 

A2L 

FDCD: 

90 

02 

BCC 

ADD 

FDCF: 

49 

FF 

EOR 

#  $  F  F 

SUB:    FORM   2'S  COMPLEMENT 

FDDl : 

65 

3C 

ADD 

ADC 

AIL 

FDD3 : 

48 

PHA 

FDD4  : 

A9 

BD 

LDA 

if  $  3D 

FDD6 : 

20 

ED 

FD 

JSR 

COUT 

PRINT    '  =       THEN  RESULT 

FDD9 : 

68 

PLA 

FDDA: 

48 

PR BYTE 

PHA 

TP I NT  BYTE  AS   2  HEX 

FDDB: 

4A 

LSR 

A 

DIGITS ,   DESTROYS  A-PEG 

FDDC: 

4  A 

LSR 

A 

FDDD: 

4A 

LSP 

A 

FDDE : 

4A 

LSR 

A 

FDDF: 

20 

E5 

FD 

JSR 

PRHEXZ 

FDE2: 

68 

PLA 

FDE3 : 

29 

OF 

PR  HEX 

AND 

#$0F 

PRINT  HEX  DIG   IN  A-REG 

FDE5: 

09 

BO 

PRHEXZ 

ORA 

#$B0 

LSB  1  S 

FDE7: 

C9 

3A 

CMP 

#$BA 

FDE  9 : 

90 

02 

BCC 

COUT 

FDEB: 

69 

06 

ADC 

#$06 

FDED: 

6C 

36 

00 

COUT 

JV)P 

(CSWL) 

VECTOR  TO  USER  OUTPUT  ROUTINE 

FDFO : 

C9 

AO 

COUT1 

CMP 

#$A0 

FDF2 : 

90 

02 

BCC 

COUTZ 

DON'T  OUTPUT  CTRL' S  INVERSE 

FDF4  : 

25 

32 

AND 

INVFLG 

MASK  WITH   INVERSE  FLAG 

FDF6 : 

84 

35 

COUTZ 

STY 

YSAV1 

SAV  Y— REG 

FDF8 : 

48 

PHA 

SAV  A-P.EG 

FDF9: 

20 

FD 

FB 

JSR 

VXDOUT 

OUTPUT  A-REG  AS  ASCII 

FDFC : 

68 

PLA 

RESTORE  A-REG 

FDFD: 

A4 

35 

LDY 

YSAV1 

AND  Y-RFG 

FDFF: 

60 

RTS 

THEN  RETURN 

FEOO : 

C6 

34 

BL1 

DEC 

YSAV 

FE02: 

FO 

9F 

BEQ 

XAM8 

FE04: 

CA 

BLANK 

DEX 

BLANK  TO  MON 

FE05 : 

DO 

16 

BNE 

SETMDZ 

AFTER  BLANK 

FE07: 

C9 

BA 

CMP 

#$BA 

DATA  STORE  MODE? 

FE09: 

DO 

BB 

BNE 

XAMPM 

NO,   XAM ,   ADD  OR  SUB 

FEOB: 

85 

31 

STOP 

STA 

MODE 

KEEP  IN  STORE  MODE 

FEOD: 

A5 

3E 

LDA 

A2L 

86 


FEOF 

:  91  40 

STA 

(A3L) ,Y 

STORE  AS  LOW  BYTE  AS  (A3) 

FE11 

:   E6  40 

INC 

A3L 

FE13 

:   DO  02 

BNE 

RTS  5 

INCR  A3,  RETURN 

FE15 

:  E6  41 

INC 

A  3  H 

FE17 

:  60 

RTS5 

RTS 

FE18 

:  A4  34 

SFTMODE 

LDY 

Y3AV 

SAVE  CONVERTED   '  :',    '  +  ', 

FE1A 

:   B9  FF 

01 

LDA 

IN-1 , Y 

'-'  ,    • . '   AS  MODE. 

FE1D 

:   85  31 

SETilDZ 

STA 

r^ODF 

FE1F 

:  60 

RTS 

FE20 

:  A2  01 

LI' 

LDX 

#$01 

FE22 

:  B5  3E 

LT2 

LDA 

A  2  L ,  X 

COPY  A 2    (2  BYTES)  TO 

FE24 

:   95  42 

STA 

A4L,  X 

A4   AND  A5 

FE26 

:   95  44 

STA 

A5L,X 

FE28 

:  CA 

DEX 

FE29 

:   10  F7 

BPL 

LT2 

FE2B 

:  60 

RTS 

FE2C 

:   Bl  3C 

MOVE 

LDA 

(AIL) ,Y 

MOVE    (Al  TO  A2)  TO 

FE2E 

:   91  42 

STA 

(A4L) ,Y 

(A4) 

FE30 

:   20  B4 

FC 

JSP 

NXTA4 

FE33 

:   90  F7 

BCC 

MOVE 

FE35 

:  60 

RTS 

FE36 

:  Bl  3C 

VFY 

LDA 

(ML)  ,Y 

VERIFY    (Al   TO  A2)  WITH 

FE38 

:  Dl  42 

CMP 

(ML)  ,Y 

<M) 

FE3A 

:  FO  1C 

BEQ 

VFYCK 

FE3C 

:   20  92 

FD 

JSP 

PRA1 

FE3F 

:   Bl  3C 

LDA 

(AIL) ,Y 

FE41 

:   20  DA 

FD 

JSR 

PR3YTE 

FE44 

:  A9  AO 

LDA 

#$A0 

FE46 

:   20  ED 

FD 

JSR 

COUT 

FE49 

:  A9  A8 

LDA 

#$A8 

FE4B 

:    20  ED 

FD 

JSR 

COUT 

FE4E 

:   Bl  42 

LDA 

(A4L) ,Y 

FE50 

:   20  DA 

FD 

J3F 

PR BYTE 

FE53 

:   A9  A9 

LDA 

#$A9 

FE55 

:    20  ED 

FD 

JSR 

COUT 

FE58 

:   20  B4 

FC 

VFYOK 

JSR 

NXTA4 

FE5B 

:   90  D9 

BCC 

VFY 

FE5D 

:  60 

RTS 

FE5E 

:   20  75 

FE 

LIST 

JSP 

A1PC 

""VE  Al    (2  BYTES )  TO 

FE61 

:   A9  14 

LDA 

#$14 

PC   IF  SPFJC'D  AND 

FE63 

:  48 

LI  ST  2 

PHA 

DISSEMBLE   20  INSTRS 

FE64 

:   20  DO 

F8 

JSR 

INSTDSP 

FE67 

:   20  53 

F9 

JSR 

PCACJ 

ADJUST  PC  EACH  INSTR 

FE6A 

:   85  3A 

STA 

PCL 

FE6C 

:   84  33 

STY 

PCH 

FE6E 

:  68 

PLA 

FE6F 

:  38 

SEC 

FE70 

:   E9  01 

SBC 

#$01 

NEXT  OF   20  INSTRS 

FE72 

:   DO  EF 

BNE 

LIST2 

FE74 

:  60 

RTS 

FE75 

:  8A 

A1PC 

TXA 

IF  USFR   SPEC'D  ADR 

FE76 

:   FO  07 

BEQ 

A IPC RTS 

COPY  FROM  A 1  TO  PC 

FE78 

:   B5  3C 

AlPCLP 

LDA 

A  1 L  ,  X 

FE7A 

9  5  3A 

STA 

PCL,X 

FE7C 

CA 

DEX 

FE7D 

10  F9 

F  PL 

A1PCLP 

FE7F- 

60 

A1PCRTS 

RTS 

FE80 : 

AO  3F 

SETINV 

LDY 

#$3F 

SET  FOR   INVERSE  VID 

FE82: 

DO  02 

BNE 

SETIFLG 

VIA  COUT1 

FE84: 

AO  FF 

SETWORM 

LDY 

#$FF 

SET  FOR  NORMAL  VID 

FE86: 

84  32 

SETIFLG 

STY 

INVFLG 

FE88: 

60 

RTS 

FE89: 

A9  00 

SETKBD 

LDA 

#$00 

SIMULATE  PORT   #0  INPUT 

FE8B: 

85  3E 

INPORT 

STA 

A2L 

SPECIFIED    (KEYIN  ROUTINE) 

FE8D: 

A2  38 

INPRT 

LDX 

#KSWL 

FE8F: 

AO  IB 

LDY 

#  KEY IN 

FE91: 

DO  08 

ENE 

IOPRT 

FE93: 

A9  00 

SETVID 

LDA 

#$00 

SIMULATE   PORT   #0  OUTPUT 

FE95: 

85  3E 

OUTPORT 

STA 

A2L 

SPECIFIED    (COUT1  ROUTINE) 

FE97: 

A2  36 

OUTPRT 

LDX 

#CSWL  . 

FE99: 

AO  FO 

LDY 

#C0UT1 

FE9B: 

A5  3E 

IOPRT 

LDA 

A  21. 

SET  RAM   IN /OUT  VECTORS 

FE9D: 

29  OF 

AND 

#$0F 

FE9F: 

FO  06 

CEO 

IOPRT 1 

FEA1: 

09  CO 

OPA 

#IOADR/256 

FEA3: 

AO  00 

LDY 

#$00 

FEA5: 

FO  02 

BEQ 

IOPRT 2 

FEA7: 

A9  FD 

IOPRT1 

LDA 

#COUTl/256 

FEA9: 

94  00 

IOPRT2 

STY 

LOC0,X 

FEA3: 

95  01 

STA 

LOClfX 

FEAD: 

60 

RTS 

FEAE: 

EA 

NOP 

FEAF: 

EA 

NOP 

FEBO: 

4C  00 

BO 

XBASIC 

J"\P 

BASIC 

TO  3ASIC  WITH  SCRATCH 

FEB  3 : 

4C  03 

20 

BASCOMT 

J  MP 

BASIC2 

CONTINUE  BASIC 

87 


FEB6:   20  75  FE  GO 

FEB9 :   20  3F  FF 

FEBC:   6C  3A  00 

FEBF:    4C  D7  FA  RcGZ 

FEC2 :  C6  34  TPACF; 

FEC4:    20  75  FE  STEPZ 

FEC7:    4C  43  FA 

FECA:   4C  F8  03  USP 

FECD:   A9  40  WRITE 

FECF:   20  C9  FC 

FED2:  AO  27 

FED4:  A2  00  WRl 

FED6:   41  3C 

FED8:  48 

FED9:   Al  3C 

FEDB:   20  ED  FE 

FEDE:    20  BA  FC 

FEE1:   AO  ID 

FEE3:  68 

FEE4:   90  EE 

FEE6:  AO  22 

FEE8:    20  ED  FE 

FEEB:    FO  40 

FEED:   A2  10  WRBYTE 

FEEF:   OA  WRBYT2 

FEFO:   20  D6  FC 

FEF3:   DO  FA 

FEF5:  60 

FEF6 :   20  00  FE  CRMOH 

FEF9:  68 

FEFA:  68 

FEFB:   DO  6C 

FEFD:    20  FA  FC  READ 

FFOO:   A9  16 

FF02:   20  C9  FC 

FF05:   85  2E 

FF07:   20  FA  FC 

FFOA:   AO  24  RD2 

FFOC:   20  FD  FC 

FFOF:   BO  F9 

FF11:   20  FD  FC 

FF14:  AO  3B 

FF16:   20  EC  FC  RD3 

FF19:   81  3C 

FF1B:   45  2E 

FF1D:    85  2E 

FF1F:   20  3A  FC 

FF22:   AO  35 

FF24:   90  FO 

FF26:   20  EC  FC 

FF29:  C5  2E 

FF28:   FO  OD 

FF2D:   A9  C5  PPERR 

FF2F:    20  ED  FD 

FF32:   A9  D2 

FF34:   20  ED  FD 

FF37:   20  ED  FD 

FF3A:   A9  87  BELL 

FF3C:   4C  ED  FD 

FF3F:   A5  48  RESTORE 

FF41:  48 

FF42:   A5  45 

FF44:  A6  46  RESTRl 

FF46:   A4  47 

FF48:  28 

FF49:  60 

FF4A:   85  45  SAVE 

FF4C:   86  46  SAVl 

FF4E:   84  47 

FF50:  08 

FF51:   6  8 

FF52:   85  48 

FF54:  BA 

FF55:   86  49 

FF57:  D8 

FF58:  60 

FF59:    20  84  FE  RESET 
FF5C:   20  2F  FB 
FF5F:   20  93  FE 
FF62:    20  89  FE 
FF6  5:   D8  MOW 
FF66:   20  3A  FF 
FF69:   A9  AA  MONZ 
FF6B:   85  33 
FF6D:    20  67  FD 


JSR     A  IPC 
JSP  RESTORE 
JMP  (PCL) 
jvp  REGOSP 
DEC  YSAV 
JSR  A1PC 
JMP  STFP 
JXP  USFADR 
LDA  #S4U 

JSR  MEADR 

LDY  #$27 

LDX  *$00 

EOP  (A1L,X) 
PHA 

LDA  (AlL,X) 

JSR  '.VP  BYTE 

JSR  NXTA.1 

LDY  #$1D 
PLA 

OCC  WRl 

LDY  #$22 

JSR  WRf-YTE 

3 EC  BSLL 

LDX  #$10 

ASL  A 

JSR  WRBIT 

BNE  WP5YT2 
RTS 

JSR  iiLl 

PLA 

PLA 

BNE  MONZ 

JSR  RD2BIT 

LDA  #$16 

JSR  HEADR 

STA  CHKSUM 

JSR  RD2EIT 

LDY  #$24 

JSR  RDBIT 

BCS  RD2 

JSR  RDBIT 

LDY  #S3S 

JSR  RDBYTE 

STA  (A1L,X) 

EOR  CHKSUM 

STA  CHKSUM 

JSR  NXTAl 

LDY  #$35 

BCC  RD3 

JSP  RDDYTE 

CMP  CHKSUM 

BEO  BELL 

LDA  #$C5 

JSR  COUT 

LDA  #SD2 

JSP  COUT 

JSR  COUT 

LDA  #S67 

JAP  COUT 

LDA  STATUS 
PHA 

LDA  ACC 

LDX  XREG 

LDY  YPEG 
PLP 
RTS 

STA  ACC 

STX  XREG 

STY  YR  EC- 
PHP 
PLA 

STA  STATUS 
TSX 

STX  5  PUT 

CLO 

RTS 

JSR  SETNOPi-i 

JSR  INIT 

JSR  SETVID 

JSR  SETKBD 
CLD 

JSR  BELL 

LDA  #$AA 

STA  PROMPT 

JSR  GETLNZ 


ADR  TO  PC   IF  SPEC'D 
RESTORE  ^ETA  REGS 
CO  TO  USER  SUBR 
TO  REG  DISPLAY 

ADR  TO  PC   IF  SPEC'D 

TAKE  ONE  STEP 

TO  USP  SUBR  AT  US R ADR 

WRITE   10-SEC  HEADER 


HANDLE  CR  AS  PLANK 
THEN  POP  STACK 
AND  RTN  TO  MON 

FIND  TAPEIN  EDGE 

DKIAY  3.5  SECONDS 
INIT  CHKSUM-$FF 
FIND  TAPEIN  EDGE 
LOOK  FOR  SYNC  BIT 

(SHORT  0) 

LOOP  UNTIL  FOUND 
SKIP  SECOND  SYNC  H-CYCLE 
INDEX  FOP   0/1  TEST 
READ  A  BYTE 
STORE  AT  (Al) 

UPDATE   RUNNING  CHKSUM 
INCP  Al,  COMPARE  TO  A2 
COMPENSATE   0/1  INDEX 
LOOP  UNTIL  DONE 
READ  CHXSU^  BYTE 

GOOD ,    SOUND   BELL  AND  RETURN 

PRINT   "ERR" ,    THEN  BELL 


OUTPUT  BELL  AND  RETURN 

RESTORE  6502  PEG  CONTENTS 
USED  BY  DEi?UO  SOFTWARE 


SAVE  65C2   REG  CONTENTS 


SET  SCREEN  10DE 

AND  INIT  KBD/SCREEN 
AS   I/O  DEV'S 

MUST  SET  HEX  MODE! 

'* '    PROMPT   FOR  MON 

READ  A  LINE 


88 


FF70: 
FF73: 
FF76: 
FF78: 
FF7A: 
FF7B: 
FF7D: 
FF80: 
FF82: 
FF85: 
FF8  7: 
FF8A: 
FF8C: 
FF8D: 
FF8E: 
FF8F: 
FF90: 
FF91: 
FF93: 
FF95: 
FF96: 
FF98: 
FF9A: 
FF9C: 
FF9E: 
FFAO: 
FFA2: 
FFA3: 
F  FA  5 : 
FFA7: 
FFA9: 
FFAB: 
FFAD: 
FFBO: 
FFB1: 
FFB3: 
FFB5: 
FFB7: 
FFB9: 
FFB3: 
FFBD: 
FFBE: 
FFCO: 
FFC1: 
FFC4: 
FFC5: 
FFC7: 
FFC9: 
FFCB: 
FFCC: 
FFCO: 
FFCE: 
FFCF: 
FFDO: 
FFD1  : 
FFD2: 
FFD3: 
FFD4: 
FFD5: 
FFD6: 
FFD7: 
FFDfe: 
FFD9: 
F  FDA : 
FFDB: 
FFDC: 
FFDD: 
FFDE: 
FFDF: 
FFEO: 
F  FE1  : 
FFE2: 
FFE3: 
FFE4: 
FFE5: 
FFE6: 
FFE7: 
FFE8: 
FFE9: 
FFFA: 
FFEB: 
FFEC: 
FFEO: 
FFEE: 
FFEF: 


20  C7 
20  A7 
84  34 
AO  17 
88 

30  E8 

09  CC 
DO  F8 
20  BE 
A4  34 
4C  73 
A2  03 
OA 

OA 
OA 
OA 
OA 

26  3E 
26  3F 
CA 

10  F8 
A5  31 
DO  06 
B5  3F 
95  3D 
95  41 
E8 

FO  F3 
DO  06 
A2  00 
8b  3E 
86  3F 
B9  00 
C8 

49  30 
C9  OA 
90  03 
69  86 
C9  FA 
BO  CD 
60 

A9  FE 
48 

B9  E3 
48 

A5  31 
AO  00 
64  31 
60 


FF 

FF  NXTITM 


CHRSRCH 

FF 
FF 
FF 

DIG 

NXTBIT 
NX TEAS 
NX TPS 2 

02  MXTCHP 


FF 


BC 
B2 
BE 
LD 
EF 
C4 
EC 
A9 
BB 
A6 
A4 
06 
95 
07 
02 
05 
FO 
00 
£B 
93 
A  7 
C6 
99 
B2 
C9 
BE 
CI 
35 
8C 
C3 
9b 
AF 
17 
17 
2B 
IF 


TOSUB 


ZMOOE 


CHRT^L 


SJPTFL 


JSR 

JSK 

STY 

LDY 

DF  Y 

B«I 

CKP 

3NE 

JSR 

LDY 

J*!P 

LOX 

ASL 

ASL 

ASL 

ASL 

ASL 

ROL 

POL 

DE  X 

BPL 

LDA 

PNE 

LDA 

ST  A 

ST  A 

INX 

<iEC 
BNF 
LOX 

STX 

STX 

LDA 

IKY 

FOR 

CMF 

3CC 

ADC 

Ct^P 

3CS 

FTS 

LDA 

PHA 

LDA 

PHA 

LDA 

LP  Y 

STY 

RTS 

DFP 

DFP 

DFB 

DFH 

DFP 

DFP 

DFH 

DFB 

DFP 
DFH 
D  F  B 
OFF. 
OF  3 
0F8 
DFP 
OFP 
DFP 
DFH 
DFB 
OFB 
DFP 
DFP 
DFB 
DFB 
DFB 
OFb 
DFB 
DF3 
DFP 
DFB 
DF? 
DFB 
DFB 
DFP 
DFB 
PF3 


CLEAR  YOW  MODE,  SCAN  IDX 
GET  ITEM,  NON-HEX 

CHAR   IN  A— REG 

X-REG-0   IF  MO  HEX  INPUT 


GETNUN 
YSAV 
#$17 

MOW  NOT  FOUND ,   GO  TO  MON 

CHRTBL,Y   FIND  CMND  CHAR   IN  TFL 
CHRSRCH 

TOSUS         FOUND,   CALL  CORRESPONDING 
YSAV  SUBROUTINE 
NXTITM 
#$03 
A 
A 
A 
A 
A 

A2L 

A  2K 

NXTBIT 
MODE 
MXTPS2 
A  2  H  ,  X 
A1H,X 
A3H,X 

'JXTBAS 
rtXTCHW 
#$0C 
A2L 
A2f; 
IV,Y 

#S30 
*$0A 
DIG 

*  $  FA 
OIG 


GOT  HEX  DIG, 
SRI  FT   INTO  A 2 


LEAVE   »$FF   IF  DIG 


IF   *!ODF  I? 

THEN  COPY  A2  TO 
Al   and  A3 


CLEAR  A2 


GET  CHAR 


IF   HEX   DIG ,  THEM 


«CO/25G  PUS:i   rilG  tf-OPOER 
S U i? ADR  O'J   ST K 
«r.T«TPL,Y  PUS'-!   1,0.;  ORDER 
SUb*.   ADR  ON  STK 

MODE 

*S0O  CLP  MODE,  OLD  M0Djr 
"r'ODE  TO  A -REG 

GO  TO  SUSP  VIA  PTS 

$BC  F("CTRL-C") 

$B2  F ("CTRL-Y" ) 

$3E  F  (  " CTRL-E  ) 

SEO  F("T") 

SF.F  F(" V") 

$C4  FC'CTFL-K"') 

SFC  F("S") 

5A9  F ( "CTPL-P" ) 

^i?  FrCTRL-B") 

$A6  F  ("-") 

$A4  F("+") 

S  0  b  F  (  "  M  ) 

$95  F("<") 

$07  F("N") 

$02  F("I") 

S05  F  (  "  L  "  ) 

SFO  F("W) 

$00  F("0") 

SFB  F("R") 

$93  F(" 

$A7  F(" .") 

$C6  F{"CR") 

$99  F ( BLANK ) 


<F=EX-OP  ?S0+$89) 


*BASCONT-l 
*USR-1 

ITPACE-1 
#VFY-1 
#INPPT-1 
#STEPZ-1 
*OUTPRT-l 
*XPASIC-1 
#SETW)DE-1 
#3ETMODE-l 
#MOVE-l 
#LT-1 


89 


FFFO: 

83 

DFB 

FFFl: 

7F 

DFB 

FFF2: 

5D 

DFB 

FFF3: 

CC 

DFB 

FFF4  : 

fb 

DFB 

FFF6: 

FC 

DFB 

FFF6: 

17 

DFB 

FFF7  : 

17 

DFB 

FFF8: 

F5 

OFB 

FFF9: 

03 

DFB 

FFFA: 

F6 

DFB 

FFFB: 

03 

DFB 

FFFC  : 

59 

DFB 

FFFD: 

FF 

DFB 

FFFE: 

80 

DFB 

FFFF: 

FA 

DFB 

EQU 

tSETUCRM-l 

#S£TINV-1 

*LIST-1 

#WRITE-1 

#GO-l 

4PEAO-1 

#SETMODE-l 

#SFTMODE-l 

#CF>!ON-l 

#  BLANK-1 

*NMI  NMI  VECTOR 

#NMl/256 

# RESET       RESET  VECTOR 

#RESET/256 

#IRC  IRO  V^TOR 

$3C 
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*********************** 

*  * 

*  APPLE-II  * 

*  MINI-ASSBW3LFR  * 

*  * 

*  COPYRIGHT  197?  PY  * 

*  APPLE  CO^PUTFP  INC.  * 

*  * 

*  ALL  RIGHTS   RESERVED  * 

*  * 

*  S.   WOZNIAK  * 

*  A.   3AUM  * 


*********************** 

TITLE   "APPLE-II  MINI-ASSEfSLER" 


P500: 

E9 

81 

F502: 

4A 

F503: 

DO 

14 

F505: 

A4 

3F 

F507: 

A6 

3E 

F509: 

DO 

01 

F503: 

88 

F50C: 

CA 

F50D: 

8A 

F50E: 

18 

F50F: 

E5 

3A 

F511: 

85 

3E 

F513: 

10 

01 

F515: 

C8 

F516: 

98 

FORMAT 

LEIJGTH 

MODE 

PROKPT 

YSAV 

i» 

PCL 
PCH" 
A 1 K 
A2L 
A2il 
A  4  L 

A4;i 

FVT 
IN 

INSDS2 

INPT03F 

PR3L2 

PCADJ 

CHAR1 

CHAR  2 

mEAP 

CURSUP 
GETLNZ 
COUT 
I3L1 

A1TCLP 
E  ELL 

GET NUM 
TOSU? 
Z.-'OOE 
CHPT3L 

PEL 


REL2 


REL3 


EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EPZ 
EQU 
EOU 
EOU 
EOU 

Eoa 

EOU 

ECU 

EOU 

ECU 

c.QU 

EOU 

ECU 

EOU 

EOU 

EOU 

EOU 

EOU 

EOU 

EOU 

ORG 

SPC 

LSP 

D-.*E 

LDY 

LPX 

BNE 
DEY 
DEX 
TXA 
CLC 
SBC 
ST  A 
6  PL 
INY 
TYA 


$2E 

S2F 

$31 

$33 

$34 

$35 

$3A 

S3* 

$30 

?3E 

S3  F 

$42 

$43 

$44 

$200 

$F68E 

SF8D0 

$F94A 

SF953 

$F9B4 

$F9;;A 

SF9C0 

$FAO0 

SFC1A 

$FD67 

$  FOE  D 

SFE00 

SFE78 

SFF3A 

$  FFA  7 

$FFPF 

$FFC7 

$FFCC 

$F500 

*sei 

A 

LFR3 
A2,i 
A2t 
PEL2 


PCL 
A2L 
PEL  3 


IS 


F.rt*T  COMPATIBLE 
H   RELATIVE  TODE? 


40. 

DOODLE   DFC RE/-?  vT 


FORM  ADDR-PC-2 
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F517 

:  E5 

3B 

SBC 

PCH 

F519 

:  DO 

6B 

ERR3 

BNE 

ERR 

ERROR   IF  >1-BYTE  BRANCH 

F51B 

:  A4 

2F 

FINDOP 

LDY 

LENGTH 

F51D 

:  B9 

3D 

00 

FN OOP 2 

LDA 

A1H ,  Y 

MOVE  INST  TO  (PC) 

F520 

:  91 

3A 

ST  A 

(PCL)  ,Y 

F522 

:  88 

DEY 

F523 

:  10 

F8 

BPL 

FNDOP2 

F525 

:  20 

1A 

FC 

JSR 

CURSUP 

F528 

:  20 

1A 

FC 

JSP 

CURSUP 

RESTORE  CURSOR 

F52B 

:  20 

DO 

F8 

JSR 

INSTDSP 

TYPE   FORMATTED  LINE 

F52E 

:  20 

53 

F9 

JSR 

PCADJ 

UPDATE  PC 

F531 

:  84 

3B 

STY 

PCH 

F533 

:  85 

3A 

STA 

PCL 

F535 

:  4C 

95 

F5 

JMP 

NXTLINE 

GET  NEXT  LINE 

F538 

:  20 

3E 

FF 

FAKEM0N3 

JSR 

TOSUB 

GO  TO  DELIM  HANDLER 

F53B 

:  A4 

34 

LDY 

YSAV 

RESTORE  Y-INDEX 

F53D 

:  20 

A7 

FF 

FAKEMON 

JSR 

GETNUM 

READ  PARAM 

F540 

:  84 

34 

STY 

YSAV 

SAVE  Y-INDEX 

F542 

:  AO 

17 

LDY 

#$17 

INIT  DELIMITER  INDEX 

F544 

:  88 

FAKEM0N2 

DEY 

CHECK  NEXT  DELIM 

F545 

:  30 

4B 

BMI 

PESETZ 

ERR  IF  UNRECOGNIZED  DELIM 

F547 

:  D9 

CC 

FF 

CMP 

CHRTBL , Y 

COMPARE  WITH  DELIM  TABLE 

F54A 

:  DO 

F8 

BNE 

FAKEMON2 

NO  MATCH 

F54C 

:  CO 

15 

CPY 

#$15 

MATCH ,   IS   IT  CR? 

F54E 

:  DO 

E8 

BNE 

FAKEMON3 

NO,   HANDLE  IT  IN  MONITOR 

F550 

:  A5 

31 

LDA 

MODE 

F552 

:  AO 

00 

LDY 

#$0 

F554 

:  C6 

34 

DEC 

YSAV 

F556 

:  20 

00 

FE 

JSR 

BL1 

HANDLE  CR  OUTSIDE  MONITOR 

F559 

:  4C 

95 

F5 

JMP 

NXTLINE 

F55C 

:  A5 

3D 

TRYNEXT 

LDA 

A1H 

GET  TRIAL  OPCODE 

F55E 

:  20 

8E 

F8 

JSR 

INSDS2 

GET  FMT+LENGTH  FOR  OPCODE 

F561 

:  AA 

TAX 

F562 

:  BD 

00 

FA 

LDA 

MNEMR , X 

GET  LOWER  MNEMONIC  BYTE 

F565 

:  C5 

42 

CMP 

A4L 

MATCH? 

F567 

:  DO 

13 

BNE 

NEXTOP 

NO,  TRY  NEXT  OPCODE 

F569 

:  BD 

CO 

F9 

LDA 

MNEML , X 

GET  UPPER  MNEMONIC  BYTE 

F56C 

:  C5 

43 

CMP 

A4H 

MATCH? 

F56E 

:  DO 

OC 

BNE 

NEXTOP 

NO,   TRY  NEXT  OPCODE. 

F570 

:  A5 

44 

LDA 

FMT 

F572 

:  A4 

2E 

LDY 

FORMAT 

GET  TRIAL  FORMAT 

F574 

:  CO 

9D 

CPY 

#$9D 

TRIAL  FORMAT  RELATIVE? 

F576 

:  FO 

88 

BEQ 

REL 

YES. 

F578 

:  C5 

2E 

NREL 

CMP 

FORMAT 

SAME  FORMAT? 

F57A 

:  FO 

9F 

BEQ 

FINDOP 

YES. 

F57C 

C6 

3D 

NEXTOP 

DEC 

A1H 

NO,  TRY  NEXT  OPCODE 

F57E 

DO 

DC 

BNE 

TRYNEXT 

F580 

E6 

44 

INC 

FMT 

NO  MORE,   TRY  WITH  LEN=2 

F582 

*  C6 

35 

DEC 

L 

WAS  L=2  ALREADY? 

F584 

*  FO 

D6 

BEQ 

TRYNEXT 

NO. 

F586 

A4 

34 

ERR 

LDY 

YSAV 

YES,   UNRECOGNIZED  INST. 

F588 

98 

ERR2 

TYA 

F589 

AA 

TAX 

F58A 

20 

4A 

F9 

JSR 

PRBL2 

PRINT  "   UNDER  LAST  READ 

F58D 

A9 

DE 

LDA 

#$DE 

CHAR  TO  INDICATE  ERROR 

F58F 

20 

ED 

FD 

JSR 

COUT 

POSITION. 

F592 

20 

3A 

FF 

RESETZ 

JSR 

BELL 

F595 

A9 

Al 

NXTLINE 

LDA 

#$A1 

'  !  1 

F597< 

85 

33 

STA 

PROMPT 

INITIALIZE  PROMPT 

F599« 

20 

67 

FD 

JSR 

GETLNZ 

GET  LINE. 

F59C' 

20 

C7 

FF 

JSR 

ZMODE 

INIT  SCREEN  STUFF 

F59F  J 

AD 

00 

02 

LDA 

IN 

GET  CHAR 

F5A2: 

C9 

AO 

CMP 

#$A0 

ASCII  BLANK? 

F5A4: 

FO 

13 

• 

SEC 

SPACE 

YES 

F5A6: 

C8 

INY 

F5A7: 

C9 

A4 

CMP 

#$A4 

ASCII    '$'    IN  COL  1? 

F5A9: 

FO 

92 

BEQ 

FAKEMON 

YES ,   SIMULATE  MONITOR 

F5AB: 

88 

DEY 

NO,   BACKUP  A  CHAR 

F5AC: 

20 

A7 

FF 

JSP 

GETNUM 

GET  A  NUMBER 

F5AF: 

C9 

93 

CMP 

#S93 

'  :  '  TERMINATOR? 

F5B1: 

DO 

D5 

ERR4 

BMI' 

iRR2 

NO,  ERR. 

F5B3: 

8A 

TXA 

F5B4: 

FO 

D2 

BEQ 

ERR2 

NO  ADR  PRECEDING  COLON. 

F5B6: 

20 

78 

FE 

JSR 

A1PCLF 

MOVE  ADR  TO  PCL,  PCH. 

F5B9: 

A9 

03 

SPACE 

LDA 

*$3 

COUNT  OF  CHARS  IN  MNEMONIC 

F5BB: 

85 

3D 

STA 

A1H 

F5BD: 

20 

34 

F6 

NXTMN 

JSR 

GETNSP 

GET  FIRST  MNEM  CH^R. 

F5C0: 

OA 

NXTM 

ASL 

A 

F5C1: 

E9 

BE 

SBC 

#$BE 

SUBTRACT  OFFSET 

F5C3: 

C9 

C2 

CMP 

#$C2 

LEGAL  CHAR? 

F5C5: 

90 

CI 

BCC 

ERR2 

NO. 

F5C7: 

OA 

ASL 

A 

COMPRESS-LEFT  JUSTIFY 

F5C8: 

OA 

ASL 

A 

F5C9: 

A2 

04 

LDX 

#$4 

F5CB: 

OA 

NXTM2 

ASL 

A 

DO  5  TRIPLE  WORD  SHIFTS 
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F5CC 

:   26  42 

F5CE 

:   26  4  3 

F5D0 

:  CA 

F5D1 

:   10  F8 

F5D3 

:   C6  3D 

F5D5 

:    FO  F4 

F5D7 

:    10  E4 

F5D9 

:   A2  05 

F0PM1 

F5DB 

:   20  34 

F6 

FORM  2 

F5DE 

:   84  34 

F5E0 

:   DD  34 

F9 

F5E3 

:   DO  13 

F5E5 

:   20  34 

F6 

F5E8 

:  or:  3 a 

F9 

F  SEE 

:    FO  OD 

F5ED 

:    BD  3A 

F9 

F5F0 

:    FO  U? 

F5F2 

:    C9  A4 

F5F4 

:    FO  03 

F5F6 

:   A4  34 

F5F8 

:  16 

FORM  3 

F5F9 

:  88 

FORM  4 

F5FA 

:    26  44 

FORMS 

F5FC 

:   EC  03 

F5FE 

DO  OD 

F600 

20  AT 

FF 

F603 

A5  3F 

F605: 

FO  01 

F607: 

EH 

F608: 

86  35 

FORV6 

F60A: 

A2  03 

F60C: 

88 

F60D: 

86  3D 

FOR/ 7 

F60F: 

CA 

F610: 

10  C9 

F612: 

A5  44 

FORM  8 


OA 
OA 

05  35 
C9  20 
BO  06 
A6  35 
FO  02 
09  80 
85  44 
84  34 
89  00  02 
C9  BB 
FO  04 
C9  8D 
DO  80 
4C  5C  F5 
B9  00  02 
C8 

C9  AO 
FO  F8 
60 


F666:   4C  92  F5  MINASM 


FORM  9 
GFTNSP 


ROL 
ROL 
DEX 
3PL 
DEC 
BFQ 
BPL 
LDX 
JSR 
STY 

cn:p 

BNE 
JSR 

C  >i  F 

IDA 
SEO 
C^P 
BFO 
LEY 
CLC 
DEY 
ROL 

cfx 

BNE 
JSP 
LDA 
BEO 
I  NX 
STX 
LDX 
DEY 
STX 
DEX 
3  PL 
LDA 

ASL 

ASL 

ORA 

CMP 

BCS 

LDX 

BEO 

ORA 

3TA 

STY 

LDA 

CMP 

BEQ 

CMP 

BNE 

JMP 

LDA 

INY 

CMP 

BEO 

RTS 
ORG 
JMP 


A4L 
A4H 

NXTM2 

A1H 

NXTM2 

NXTMN 

«S5 

GETNSP 
YSAV 
CHAR1,X 
FORM  3 
GETNSP 
CH\E2,X 
PO  R  M  5 
CdA*2,X 

fop:m 

#SA4 

FOpr-M 
YSAV 


f;<t 

*S3 

for:*  7 

GETNU'* 
A2H 
FORM  6 

L 

#S3 
A  1 H 

FOR"  2 

F.MT 

A 

A 

L 

*$20 

forms 
l 

FORK  8 

#$80 

FMT 

YSAV 

IN,Y 

#$B3 

FORM  9 

#$8D 

ERR  4 

TRYNEXT 

IN,  Y 

#$A0 
GETNSP 

$F666 
RESETZ 


DONF  WITH   3  CHARS? 

YES,    RUT  DO  1  MORE  SHIFT 

MO 

5  CHAPS   IN  A  DDR  t*OPE 
GFT   FIRST  CHVR  OF  A  DDR 

FIRST  CHAR  MATCH  PATTERN? 
NO 

YES,  GET  SECOND  CHAR 
BATCHES  SECOND  HALF? 
YES 

MO,    13   SECOND  HALF  ZERO? 
YP$  . 

NO,SFCO^'0  HALF  OPTIONAL? 
iES. 

CLEAR   BIT-NO  HATCH 

«ACK  UP   1  CHAR 

FORW   FOP MAT  BYTE 

TIME   TO  CHECK   FOR  ADDR . 

NO 

YES 

HIGH-ORDER  3YTE  ZERO 
NO,    INCP   FOR  2-BYTE 
STORE  LENGTH 
RELOAD  FORMAT  INDEX 
BACKUP  A  CHAR 
SAVE  INDEX 

DONE  WITH   FORMAT  CHECK? 
NO. 

YES,   PUT  LENGTH 
IN  LOW  BITS 


ADD  '$*  IF  NONZERO  LENGTH 
AND  DON'T  ALREADY  HAVE  IT 


GET  NEXT  NOW BLANK 

'  ; '   START  OF  COMMENT? 

YES 

CARRIAGE  RETURN? 
NO,  ERF. 


GET  NEXT  NON  BLANK  CHAR 
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*********************** 

*  * 

*  APPLE-I1   FLOATING  * 

*  POINT  ROUTINES  * 

*  * 

*  COPYRIGHT  1977  BY  * 

*  APPLE  COMPUTER  INC.  * 

*  * 

*  ALL  RIGHTS   RESERVED  * 

*  * 

*  S.   WOZNIAK  * 

*  * 
*********************** 

TITLE   "FLOATING  POINT  ROUTINES1' 


SIGN 

EPZ 

$F3 

X2 

EPZ 

$F4 

H2 

EPZ 

$F5 

XI 

FPZ 

$F8 

Ml 

E 

EPZ 
EPZ 

?F9 
SFC 

OVLOC 

EOU 
ORG 

$3F5 
$F425 

F425< 

IB 

ADD 

CLC 

CLEAR  CARRY. 

F426 

A  2 

02 

LDX 

#$2 

I N DFX   FOR   3- BYTE  ADD. 

P  A  OR 

C  4  £.  O 

B5 

F9 

ADDl 

LDA 

•u  1  ,  X 
tf2,X 

ADD  A   '3 YT E  OF  MA  NT  2  TO  MANTl. 

F42A 

75 

F5 

ADC 

F42C 

95 

F9 

STA 

Ml,X 

F42E 

CA 

DKY 

INDEX  TO  NEXT  MORE  SIGNIF.    BYTE . 

F42F 

10 

F7 

DPL 

ADDl 

LOOP  UNTIL  DOME. 

F431 

:  60 

RTS 

RETURN 

F432 

:  06 

F3 

MD1 

A3L 

SIGN 

CLEAR   LSB  OF  SIGN. 

F434 

:  20 

37 

F4 

JSR 

ars;'ap 

AR3   VUL  OF  Ml,    THEN  SWAP  WITH  M2 

F437 

:  24 

F9 

ABSvVAP 

BIT 

Ml 

MANTl  NEGATIVE? 

f  4  J? 

:  10 

05 

DPL 

AB3WAP1 

NO,    S17AP  WITH  MA  NT  2  AMD  RETURN. 

F433 

:  20 

A4 

F4 

JSR 

FCOi-'iRL 

YES ,   COMPLEMENT  IT. 

F4  3E 

:  E6 

F3 

I NC 

SIGN 

INC-   SIGN,   COMPLEMENTING  LSB. 

F440 

:  36 

ADS»"AP1 

SEC 

SET  CARRY  FOR  RETURN  TO  MUL/DIV. 

F441 

\  A2 

04 

sv;ap 

LDX 

#S4 

INDEX   FOR   4 -BYTE  SWAP. 

F  4  4  3 

:  94 

FB 

SWA  pi 

STY 

E-l  ,X 

F  4  45 

:  B5 

F7 

LDA 

Xl-1 , X 

SWAP  A  BYTE  OF  EXP/MANTl  WITH 

F447 

:  34 

F3 

LDY 

X2-1,X 

EXP/MANT2   AND  LEAVE  A  COPY  OF 

F4  49 

:  94 

F7 

STY 

X1-1,X 

'Wri   IN  c    (3  BYTES)  .      E+3  USED 

F4  48 

:  95 

F3 

STA 

X2-1  ,X 

F44D 

:  CA 

DFX 

ADVANCE   INDEX  TO  N 2 XT  BYTE. 

F44E 

:  DO 

F3 

6M  F 

S.^Pl 

LOOP   UNTIL  DONE. 

F4  50 

:    6  U 

RTS 

RETURN 

F451 

:  A9 

SE 

FLOAT 

LDA 

*$RE 

INIT  EXPl   TO  14, 

F4  53 

:    8  5 

F6 

STA 

XI 

THEN  NORMALIZE  TO  FLOAT. 

F4  55 

:  A5 

F9 

NORM  1 

LDA 

Ml 

HIGv*— ORDER   MA  N'T  1  BYTE. 

F457 

:  C9 

CO 

C^P 

#$C0 

UPPER  T'.'O  PITS  UNEOUAL? 

F459 

:  30 

oc 

BMI 

RTS  1 

YES,   RETURN  WITH  MANTl  NORMALIZED 

F45^ 

:  C6 

Ft? 

DEC 

XI 

DECREMENT   E XPl . 

F45D 

06 

FP 

ASL 

Ml  +  2 

F4  5F 

:  26 

FA 

ROL 

"1  +  1 

SHIFT  MANTl    (3   BYTES)  LFFT. 

F461 

:  26 

F9 

RGL 

Ml 

F463 

.  A5 

F8 

NORM 

LDA 

XI 

EXPl  ZERO? 

F465 

.  DO 

EE 

BNE 

NORMl 

NO,   CONTINUE  NORMALIZING. 

F467 

60 

RTS1 

PTS 

RETURN. 

F468 

20 

A4 

F4 

FSUEl 

JSR 

FCOf'PL 

CMPL  MANT1, CLEARS  CARRY  UNLESS  0 

F46B 

20 

7B 

F* 

SWPALGN 

JSR 

ALGNSU'P 

RIGHT  SHIFT  MANTl  OR  SWAP  WITH 

F46E 

A5 

F4 

FA  CD 

LDA 

X2 

F470 

C5 

F8 

CMP 

X1 

COMPARE   EXPl   WITH  EXP2. 

F472 

.  DO 

F7 

8ME 

SWPALGN 

IF   #,SWAP  ADDENDS  OP  ALIGN  MANTS . 

F474 

:  20 

25 

F4 

JSR 

ADD 

ADD   ALIGNED  MANTISSAS. 

F477: 

50 

EA 

ADDEND 

BVC 

NOR*'! 

NO  OVERFLOW,    NORMALIZE  RESULT. 

F479: 

70 

05 

BVS 

RTLOG 

OV:   SHIFT  Ml   WIGHT,   CARPY  INTO  SIGb 
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F  4  7B : 

q  n 

p  a 

AT  f^K'^P 

BCC 

SWAP 

* 

FLSE  SHIFT  PK 

f  4  /U! 

&  ^ 

o  j 

PQ 

PTAP 

LDA 

>:  1 

C  A  "7  P  • 

U  A 

ASL 

A 

F480 : 

E6 

F8 

RTI.OG 

INC 

XI 

r  ** oz : 

pn 
r  u 

/  9 

PEC 

OVFL 

a  9 
A  z 

pa 

RTtfOGl 

LDX 

#  $FA 

F486 : 

76 

FF 

ROP1 

ROR 

E  +  3  ,  X 

r  900 . 

to 

I  NX 

M03! 

uu 

p  n 

R0R1 

F488 : 

60 

PTS 

r  4  • 

20 

32 

F4 

F'VUL 

JSP 

FD1 

Mot  ! 

0  9 

pft 
r  o 

ADC 

XI 

F491 : 

20 

E2 

F4 

J3R 

vr,2 

V  AO  A  . 

J.  o 

CLC 

Hjj; 

*>  n 
z  u 

Q  A 

F4 

■1  DM 

JS  i\ 

R  T  LO  G 1 

F498 : 

90 

03 

3CC 

f  'UL2 

F49A : 

*5  n 
*u 

9  ^ 
Z  9 

P  A 

JSP 

ADD 

F49D : 

U  Q 

o  o 

ji-i  l,  2 

DE'Y 

F49E : 

10 

F5 

PPL 

MULl 

p  Ah  n  • 

r  Hft  u  • 

46 

F3 

M  D  E  0 

LSR 

5 1 G  M 

F  4A  2 : 

p 

NOP'i  X 

PCC 

^GR>" 

F4 A4 : 

38 

FCOIPL 

PEC 

P  A  &  « 
r  **  ft  d  « 

t\£. 

03 

LDX 

#$3 

i?  a  a  "7  • 

aQ 

nn 

CO-I  PLl 

LDA 

#$0 

F4A9  : 

F5 

F8 

SSC 

Xl  ,  X 

V  H  A  D 

Q  i 
7  J 

Fd 

5TA 

XI  ,X 

F4  AD : 

p  a 

DEX. 

F4AE : 

DO 

F7 

BNE 

COMPL1 

r  hd  U 

pn 

C5 

BEQ 

ADDEND 

F  4B2 

9  f\ 
ZU 

F  4 

FD  I V 

JSP 

J*Dl 

F4B5 

F.5 

F8 

SRC 

XI 

pap"7 

20 

E2 

F4 

JSR 

MD2 

C  A  O  K 

i  ft 

D I  Vl 

S  EC 

F4BB 

A  2 

02 

LDX 

#$2 

Dili 

D  J 

F  5 

DI V2 

LDA 

M2  ,  X 

Mar 

P^ 

FC 

SBC 

E  ,  X 

F4C1 

•  48 

PHA 

r  z 

»  pa 

DEX 

r  o 

:    j.  u 

v  ft 

BPL 

f?IV2 

F4C5 

:  A2 

FD 

LDX 

#$FD 

PAP 

.  53 

DI V  3 

PLA 

:  90 

02 

BCC 

DI  V4 

F4CA 

:  95 

F8 

ST  A 

M2  +  3  ,  X 

p  Anc 

>  PA 

m  V  A 

I  NX 

t  4LU 

nn 

F8 

BNE 

DI  V3 

F4CF 

i  26 

FB 

ROL 

Ml  +  2 

r  4UJ. 

i    9  ft 

FA 

POL 

Ml  +  1 

F4D3 

:  zo 

PQ 

ROL 

M 1 

F4D5 

:  06 

F7 

ASL 

2 + 2 

p  An? 

:  26 

F6 

PvOL 

M2  +  1 

F4D9 

•     9  ft 
!  ZD 

p<\ 
r  9 

POT 

rl  £. 

F4DB 

:  B0 

1C 

BCS 

OVFL 

pa  nn 

■  ft  ft 

■  o  o 

DEY 

r  HUE* 

»  nn 

na 

Urt 

BNE 

DI  VI 

F4£0 

:  F0 

BE 

BEO 

MDFND 

pap  9 

:  86 

FB 

MD2 

STX 

Ml  +  2 

PAPA 

•   ft  fi 

FA 

STX 

Ml  +  1 

F4E6 

:  86 

F9 

STX 

Ml 

F4E8 

:  B0 

0D 

scs 

OVCh'K 

PA  PA 

•  JU 

04 

BMI 

MD3 

F4EC 

:  68 

PLA 

p  A  pn 

:  6  8 

PLA 

P  A  P  P 

•  on 

BCC 

F4F0 

:  49 

80 

MD3 

EOR 

#$80 

PAP  2 

•  ft  S 

•  O  J 

F8 

ST  A 

XI 

PAPA 

•  an 

•  ft  U 

17 

LOY 

*$17 

F4F6 

:  60 

PTS 

F4F7 

:  10 

F7 

OVCHK 

BPL 

MD3 

F4F9 

•  AP 

p^ 
r  9 

03 

Uv  f  L 

J  ""IP 
ORG 

OVLOC 
$F630 

pfi 

r  g  JU 

:  20 

7D 

F4 

FIX  1 

JSP 

RTAR 

p£  a  n 
r  0  *t  U 

•   a  ^ 
:   ft  9 

F8 

pry 

LDA 

XI 

F642 

:  10 

13 

3  PL 

UMDFL 

F644 

:  C9 

8E 

CMP 

#$85 

Pft  A 

•  nn 

F5 

C-^F 

FIX1 

F648 

:  24 

F9 

BIT 

Ml 

Pfi  AA 

:  10 

OA 

BPL 

FIXPTS 

r  o  **c 

•   a  ^ 

:   ft  j 

PR 

LDA 

%  1  +  2 

F6  4E 

:  F0 

06 

BFO 

FIXRTS 

pa  =in 

FA 

INC 

Ml  +  1 

r  o  DZ 

•  nn 
z  uu 

u  £ 

B  iSI  E 

FIXRTS 

F654 

:  E6 

F9 

INC 

Kl 

PC  cc 
roju 

FIXRTS 

PTS 

p  c  c  7 
r  t>  9  / 

•  aQ 

n  fi 

nian  pT, 

LDA 

#$0 

F6  59 

:   8  5 

F9 

ST  A 

Kl 

F65B 

:  85 

FA 

ST  A 

'U  +  l 

F65D 

:  60 

RTS 

SWAP  IF  C ARR¥  CLEAR , 
1  ARITH. 

SIGN  OF  MAMT1   INTO  CARRY  FOR 
RIGHT  ARITH  SHIFT. 

INCR  XI  TO  ADJUST  FOR  RIGHT  SHIFT 

EXPl  OUT  OF  RANGE. 

INDEX  FOR  6-.PYTE  RIGHT  SHIFT. 

NFXT  BYTE  OF  SHIFT. 
LOOP  UNTIL  DON?!. 
RETURN . 

ABS  VAL  OF  tfANTl,  MANT2. 

ADD  EXPl  TO  BXP2   FOR  PRODUCT  EXP 

CHECK  PROD ■    EXP  AND  PREP.    FOR  MUL 

CLEAR  CARP Y  FOR   FIRST  BIT. 

Ml  A^D  E  RIGHT    (PROD  AND  MPLIEP) 

IF  CARRY  CLEAR ,   SKIP  PARTIAL  PROD 

ADC  MULTIPLICAND  TO  PRODUCT . 

NEXT  ^UL  ITERATION. 

LOOP  UNTIL  DONE. 

TEST  SIGN  LSB. 

IF  EVEN, NORMALIZE  PROD, ELSE  COMP 
SET  CARRY  FOP  SUBTRACT. 
INDEX  FOR   3* BYTE  SUBTRACT. 
CLEAR  A. 

SUBTRACT  PYTE  OF  EXPl. 
RESTORE  IT. 

NEXT  MORE  SIGNIFICANT  BYTE. 
LOOP  UNTIL  DONE. 

NOPMALIZE    (OR  SHIFT  RT   IF  OVFL). 
TAKE  ABS  VAL  OF  MANTl ,  MANT2. 
SUBTRACT  EXPl   FROM  EXP2. 
SAVE  AS  QUOTIENT  EXP. 
SET  CARRY  FOR  SUBTRACT. 
INDEX  FOR   3-PYTF  SUBTRACTION. 

SUBTRACT  A  BYTE  OF  E  FROM  MANT2 .; 
SAVE  ON  STACK. 
NEXT  MORE  SIGNIFICANT  BYTE. 
LOOP  UNTIL  DONE. 

INDEX  FOR  3 -BYTE  CONDITIONAL  MOVE 
PULL  BYTE  OF  DIFFERENCE  OFF  STACK 
IF  M2<E  THEN  DON 1 T  RESTORE  M2. 

NEXT  LESS  SIGNIFICANT  BYTE. 
LOOP  UNTIL  DONE. 

ROLL  QUOTIENT  LEFT, CARRY  INTO  LSB 


SHIFT  DIVIDEND  LEFT. 

OVFL  IS  DUE  TO  UNNORMED  DIVISOR 
NEXT  DIVIDE  ITERATION. 
LOOP  UNTIL  DONE  23  ITERATIONS. 
NORM.   QUOTIENT  AND  CORRECT  SIGN. 

CLEAR  MANTl    (3  BYTES)    FOR  MUL/DIV. 

IF  CALC.   SET  CARRY, CHECK  FOR  OVFL 
IF  NEG  THEN  NO  UNDERFLOW. 
POP  ONE   RETURN  LEVEL. 

CLEAR  XI  AND  RETURN. 

COMPLEMENT  SIGN  BIT  OF  EXPONENT. 

STORE  IT. 

COUNT  24  VUL/23  OIV  ITERATIONS 
RETURN. 

IF  POSITIVE  EXP  THEN  NO  OVFL. 
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*********************** 

*  * 

*  APPLE-II   PSEUDO  * 

*  MACHINE   INTERPRETER  * 

*  * 

*  COPYRIGHT  1977  * 

*  APPLE  COMPUTER   IiiC  * 

*  * 

*  ALL  RIGHTS  RESERVED  * 

*  * 

*  S.   WOZNIAK  * 

*  * 
*********************** 

TITLE   "SWEET 16  INTERPRETER" 


ROL 

EPZ 

$0 

POM 

EPZ 

$1 

PI  4ri 

CPZ 

$10 

R15L 

EPZ 

$1E 

R15H 

EPZ 

:  IF 

S 1 6  PAG 

EQU 

$F7 

SAVE 

EQO 

$FF4  A 

RESTORE 

5QU 
ORG 

$FF3F 
$F6£9 

F689< 

20 

4A 

FF 

SvU6 

J3R 

SAVE 

PRESERVE  6502   REG  CONTFNTS 

F68C« 

68 

PLA 

F68D: 

85 

IE 

STA 

Rl  5L 

I NIT  S  <EETlo  PC 

F68F 

•  68 

PLA 

FROM  RETURN 

F690 

85 

IF 

STA 

F15H 

ADDPESS 

F692 

:  20 

98 

F6 

SW16S 

JSP 

SW16C 

INTERPRET   A^'D  EX  ECU  IE 

F695 

•  4C 

92 

F6 

JMP 

SVJ16P 

OtfE  SWEET  16  INSTR. 

F698 

:  E6 

IE 

SW1GC 

IMC 

R15L 

IN  CP  S'?E'ET16   PC  FOR  FETCH 

F69A 

DO 

02 

BrJE 

SW16D 

F69C 

.  E6 

IF 

INC 

P15H 

F69E 

A9 

F7 

S.M16D 

LDA 

*S16PAG 

F6A0 

48 

PHA 

PUSH  ON   STACK   FOR  PTS 

F6A1 

•  AO 

00 

LDY 

#$0 

F6A3 

Bl 

IE 

LDA 

(R15L) ,Y 

FETCH  INSTR 

F6A5 

29 

OF 

AND 

#$F 

><*\SK   REG  SPECIFICATION 

F6A7< 

OA 

A  S  L 

A 

DOUBLE   rUh    &*-  "lit   K£,L;l  s  i  CjKd 

F6A8 

AA 

TAX 

TO   X  —  P  EG    Fu K    I  ■'  u  t*.  X 1  IN  b 

F6A9 

4A 

LS  R 

A 

F6AA 

51 

IE 

EOR 

(R15L) ,  Y 

NU V    rHVfc  OrLUUb 

F6AC 

F0 

OB 

3EO 

TO  BP 

IF   Z.jRO   THEN   NU'N  —  Khij  'Jr 

F6AE 

:  66 

ID 

STX 

R  1 4H 

T'.inT^Al1!?  I  ddthd    ppcnr  T  DPT!' 
I  X  D 1  C  A 1  c.    rhlUr    t  toULjl  fLlj 

F6B0 

:  4A 

LSR 

A 

F6B1 

:  4A 

LSR 

A 

OPCODE* 2  TO  LSP 'S 

F6B2 

:  4A 

LS  R 

A 

F6B3 

:  A8 

T4  Y 

F684 

:  69 

E 1 

Ft! 

LI  >f\ 

F6B7 

:  48 

PHA 

ONTO  STACK 

F6B8 

:  60 

PTS 

GOTO  REG -OP  ROUTINE 

F6B9 

:  E6 

IE 

T03P 

IMC 

R.15L 

F6BE 

:  DO 

02 

I NCR  PC 

F63D 

E6 

IF 

INC 

R15H 

F6BF 

BD 

E4 

F6 

TC:*K2 

LDA 

innvL,x 

LOU— 0 RDF R   ADR  BYTE 

F6C2 

48 

l:HA 

ONTO  STACK   FOtf   KON-RFO  OP 

F6C3: 

A5 

ID 

LDA 

R1*B 

'  PRIOR   RESULT  PEG 1  INDEX 

F6C5' 

4  A 

LSP 

A 

PREPARE  CARRY  FOR  BC ,   BNC . 

F6C6- 

60 

PTS 

GOTO  NON-PEG  OP  ROUTINE 

F6C7: 

68 

RTWZ 

PLA 

POP  RETURN  ADDRESS 

F6C8 

68 

PLA 

RESTORE   6502  REG  CONTENTS 

F6C9: 

20 

3F 

FF 

JSR 

RES TO RE 

F6CC: 

6C 

IE 

00 

J*  P 

(R15L) 

RETURN  TO  6502  CODE  VIA  PC 

F6CF' 

Bl 

IF 

SETZ 

LDA 

(R15L)  ,Y 

HIGH-ORDER  BYTE  OF  CONSTANT 
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F6D1 : 
F-6D3  : 
F6D4 : 
F6D6: 
F6D8: 
F6D9: 
F6DA: 
F6DC: 
F6DE: 
F6E0: 
F6E2: 
F6E3: 
6E4: 
F6E5: 
F6E6: 
F6E7: 
F6E8: 
F6E9: 
F6EA: 
F6EB: 
F6EC: 
F6ED: 
F6EE: 
F6EF: 
F6F0: 
F6F1: 
F6F2: 
F6F3: 
F6F4: 
F6F5: 
F6F6: 
F6F7: 
F6F8: 
F6F9: 
F6FA: 
F6FB: 
F6FC: 
F6FD: 
F6FE: 
F6FF: 
F700: 
F701: 
F702; 
F703: 
F705; 

F707 
F709 
F70B 
F70D 
F70E 
F710 
F712 
F714 
F716 
F717 
F719 
F71B 
F71D 
F71F 
F721 
F723 
F725 
F726 
F728 
F72A 
F72C 
F72E 
F730 
F732 
F734 
F737: 
F739 
F73A 
F73D: 
F73F 
F741 
F743 
F745 
F747 
F748 
F74B 
F74D 
F74F 
F752 


95  01 

88 

Bl  IE 

95  00 

98 
38 

65  IE 
85  IE 
90  02 
E6  IF 
60 
02 
F9 
04 
90 
0D 
9E 
25 
AF 
16 
B2 
47 
B9 
51 
CO 
2F 
C9 
56 
D2 
85 
DP 
6E 
05 
33 
E8 
70 
93 
IE 
E7 
65 
E7 
E7 
:  E7 
:    10  CA 
;    B5  00 

85  00 
B5  01 
85  01 
60 

A5  00 
95  00 
A5  01 
95  01 
60 

A5  00 
81  00 
AO  00 

84  ID 
F6  00 
DO  02 
F6  01 
60 

Al  00 

85  00 
AO  00 

84  01 
FO  ED 
AO  00 
FO  06 
20  66 
Al  00 
A8 

20  66 
Al  00 

85  00 
84  01 
AO  00 

84  ID 
60 

20  26 
Al  00 

85  01 
4C  IF 
20  17 


S  FT  2 
OPTBL 
BP  TBI- 


SET 

LD 
BK 


ST 


STAT 
STAT  2 

STAT  3 
INR 


INR2 
LDAT 


POP 
F7  POPD 

F7  POP2 

POP  3 
F7  LDDAT 


F7 

F7  5TDAT 


STA 

DFY 

LDA 

5TA 

TYA 

SEC 

ADC 

ST  A 

BCC 

IWC 

RTS 

DFB 

DEL 

DFB 
□  FF 
OFF 
DFR 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DF8 
DFB 
DFP 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
DFB 
3PL 

LDA 
EQU 
STA 
LUA 
STA 
RTS 
LDA 
STA 
LDA 
STA 
RTS 
LDA 
STA 
LDY 
STY 
INC 
3NE 
INC 
RTS 
LDA 
STA 
LDY 
STY 
BEO 
LDY 
BEO 
JSR 
LDA 
TAY 
JSR 
LDA 
STA 
STY 
LDY 
STY 
RTS 
JSR 
LDA 
STA 
J  VP 
JSR 


ROH  ,  X 

(ia5L)  ,Y 
R  0  L  ,  X 


tU5L 
P15L 
SET  2 
P15H 

3ET-1 
RfN-1 
LD-1 
ER-1 
ST-1 
BMC-1 
LDAT-1 
BC-1 
STAT-1 
BP-1 
LDDAT— 1 
BM-1 
ST DAT- 1 

nz-l 

POP-l 
•3NZ-1 
STPAT-1 
BHl-1 
ADD-1 
3N<«1-1 
SU3-1 
BK-1 
PCPD-1 
PS-1 
CPR-1 
3S-1 
INR-1 
NUL-1 
DCR-1 
NUL-1 
NUL-1 
NUL-1 
SETZ 

R0L,X 
*-l 

ROL 
R0H,X 
ROH 

ROL 
ROL  r  X 
ROH 
R0H,X 

ROL 

(R0L,X) 
#$0 
R14H 
R0L,X 
INR2 
R0H,X 

(R0L,X) 
POL 
#$0 
ROH 
STAT  3 
#$0 
POP2 
DC* 

(R0L,X) 
DCP 

(POL, X) 
ROL 

ROH 
#$0 
R14R 

LDAT 
(R0L,X) 

ROVI 
INR 
STAT 


LOW-ORDFR   BYTE   OF  CONSTANT 
Y-REG  CONTAINS  1 
ADD   2  TO  PC 


(IX) 

(0) 

(2X) 

(1) 
(3X) 

(2) 

(4X) 

(3) 

(5X) 

(4) 

(6X) 

(5) 

<7X) 

(6) 

(8X) 

(7) 

(9X) 

(8) 

(AX) 

(9) 

(BX) 

(A) 

(CX) 

(B) 

(DX) 

(C) 

(EX) 

<D) 

(EX) 

(E) 

(UNUSED) 
(F) 

ALWAYS  TAKEN 


MOVE  RX  TO  RO 
MOVE  RO  TO  RX 

STORE  BYTE  INDIRECT 
INDICATE  RO   IS  RESULT  REG 
INCR  RX 

LOAD   INDIRFCT  (RX) 
10  RO 

ZERO  HIGH-ORDER  PO  BYTE 

ALWAYS  TAKEN 

HIGH  ORDER  BYTE  =  0 

ALWAYS  TAKEN 

DECR  RX 

POP  HIGH-ORDER  BYTE  GRX 
SAVE  IN  Y-REG 
DEC  P.  RX 

LOW-ORDER  BYTE 
TO  RO 

INDICATE  RO  AS  LAST  RSLT  RE 


LOW-ORDER  BYTE  TO  RO ,  INCR 
HIGH-ORDER  BYTE  TO  RO 

INCR  RX 

STORE   INDIRECT  LOW-ORDER 
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F755: 
F757: 
F759: 
F7  5C: 
F75F: 
F761: 
F763: 
F766: 
F768: 
F76A : 
F76C: 
F76E: 
F76F: 

F771: 
F772: 
F774: 
F776: 
F779: 
F77B: 
F77D: 
F780: 
F781: 
F783: 
F785: 
F786: 
F788: 
F78A: 
F78C: 
F78£: 
F790: 
F792: 
F794: 
F796: 
F799: 
F79B: 
F79E: 
F79F: 
F7A1: 
F7A3: 
F7A5: 
F7A6: 
F7A8: 
F7AA: 
F7AB: 
F7AD: 
F7AF: 
F7E0: 
F7B2: 
F7B3: 
F7B4: 
F7B5: 
F737: 
F7B9: 
F7BA: 
F7BB: 
F7BC: 
F7BE: 
F7C0: 
F7C1: 
F7CZ: 
F7C3: 
F7C5: 
F7C7: 
F7C9: 
F7CA: 
F7CB: 
F7CC : 
F7CE; 
F7D0 
F7D2 
F7D3 
F7D4 
F7D5 
F7D7 
F7D9 
F7DB 
F7DD 
F7DE 
F7DF 
F7E0 
F7E2 
F7E4 
F7E6 
F7E8 
F7E9 


A5  01 
81  00 
4C  IF  F7 
20  66  F7 
A5  00 
81  00 
4C  43  F7 
B5  00 
DO  02 
D6  01 
D6  00 


60 

AO  00 
38 

A5  00 
F5  00 
99  00  00 
A5  01 
F5  01 
99  01  00 
98 

69  00 
85  ID 
60 

A5  00 
75  00 
85  00 
A5  01 
75  01 
AO  00 
FO  E9 
A5  IE 
20  19  F7 
A5  IF 
20  19  F7 
18 

BO  OE 
51  IE 
10  01 
88 

65  IE 
8  5  IE 
98 

65  IF 
85  IF 

;  60 
;    BO  EC 
:  60 
:  OA 
:  AA 
:   B5  01 
:    10  E8 
:  60 
:  OA 
A  A 

B5  01 
30  El 
60 
OA 
AA 

B5  00 
15  01 
FO  08 
60 
OA 
A  A 

B5  00 
15  01 
DO  CF 
60 
OA 
AA 

B5  00 
35  01 
49  FF 
FO  C4 
60 
OA 
AA 

B5  00 
35  01 
49  FF 
DO  B9 
60 

A2  18 


STPAT 


DCS 
OCR  2 

CPR 


3U62 


ADD 


BS 


BR 

BNC 

381 


3R2 


BNC  2 
BC 

BP 


5Z 


P  -}.  7, 


BM1 


BN  Ml 


NUL 
RS 


LDA 
STA 
JMP 
JSP 
LDA 
STA 
J  MP 
LDA 
BNE 
DEC 
DEC 
RTS 
LDY 

SEC 
LDA 
SBC 
STA 
LDA 
SBC 
STA 
TYA 
ADC 
STA 
RTS 
LDA 
ADC 
STA 
LDA 
ADC 
LDY 
BEO 
LDA 
JSR 
LDA 
JSR 
CLC 
ECS 
LDA 
3PL 
DEY 
ADC 
STA 
TYA 
ADC 
STA 
RTS 
BCS 
RTS 
ASL 
TAX 
LDA 
BPL 
PTS 
ASL 
TAX 
LDA 
BMI 
RTS 
ASL 
TAX 
IDA 
OF.  A 
DEO 
RTS 
AS  L 
TAX 
I,  DA 
ORA 
BN  E 
RTS 
ASL 
TAX 
LDA 
AND 
EOR 
BEQ 
PTS 
ASL 
TAX 
LDA 
AND 
EOR 
BNE 
RTS 
LDX 


ROM 

(R0L,X) 

IisfR 

dcf 

ROL 

(P0L,X) 
POP  3 
R0L,X 
DC  R  2 
ROH  ,  * 
R  0  L  ,  X 

#  so 

ROL 
ROL ,  X 
ROL ,  Y 
ROH 
R0H,X 
ROH  ,  Y 

#$0 
R14H 

ROL 
ROL ,  X 
ROL 
P  OH 
ROB,  X 
#$0 
SUB2 
R15L 
STAT  2 
R15H 
STAT  2 

BNC  2 
(R15I-) 

BR  2 

R15L 
R15L 

R15H 
R15H 

BP 
A 

P0H,X 
RPl 


BYTE   AND   INCP  RX.  THEN 
STORF   HIGH-ORDER  BYTE. 
INCR   PX  AND  RETURN 
DECP  RX 

STORE   FO   LOW  »YTE  <3RX 
INDICATE  PO  AS  LAST  RSLT  PEG 

DECP  pX 


RFSULT  TO  RO 

NOTE  Y-REG  =  13*2  FOR  CPR 


RO-RX  TO  RY 


LAST  RESULT  REG* 2 
CARRY  TO  LSB 


RO+RX  TO  RO 


RO  FOR  RESULT 

FINISH  ADD 

NOTE  X-REG  IS  12*2! 

PUSH  LOW  PC  BYTE  VIA  Rl2 

PUSH  HIGH-ORDER  PC  BYTE 

WO  CARRY  TEST 
,Y   DISPLACEMENT  BYTE 


ADD  TO  PC 


R  0  H  ,  X 
RPl 


R0L,X 
R  0  H  ,  X 


r  o  r,  ,  x 

R0H,X 
BR  1 


ROL  f  X 
ROH ,  X 
#$FF 
BR  1 


ROL ,  X 
R0H,X 
#$FF 
BP1 

*$18 


LOU EL E  RESULT-PEG  INDEX 
TO  X-REG   FOR  INDEXING 
TEST  FOR  PLUS 
PPANCH   IF  SO 

DOU3LF  RESULT-PRC  INDEX 
TEST  FOR  I^INUS 

COUPLE  RESULT-PEG  INDEX 

TEST  FOR  ZERO 
(BOTH  RYTES) 
BRANCH    IF  SO 

DOUPLC  RESULT-REG  INDEX 

TEST   FOR  NOW 7, FRO 
(BOTH  BYTES) 
BRANCH   IF  SO 

DOUBLE  RESULT-REG  INDEX 

CHECK  BOTH  BYTES 
FOR   $FF    (MINUS  1) 

BRANCH   IF  SO 

DOUBLE  RESULT-REG  INDEX 

CHECK  BOTH  BYTES   FOR  NO  $FF 

BRANCH   IF  NOT  MINUS  1 

12*2   FOR  R12  AS  STK  POINTER 


98 


F7EB:  20  66  F7 

F7EE:  Al  00 

F7F0:  85  IF 

F7F2:  20  66  F7 

F7F5:  Al  00 

F7F7:  85  IE 

F7F9:  60 

F7FA:  4C  C7  F6  RTM 


JSR  DCR  DECR   STACK  POINTER 

LDA  ( ROL , X)      POP  HIGH  RETURN  ADR  TO  PC 

STA  R15H 

JSP  DCP  SAME  FOR  LOW-ORDER  BYTE 

LDA.  (R0L,X) 

STA  R15L 
RTS 

J*IP  RTNZ 
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6502  MICROPROCESSOR  INSTRUCTIONS 


ADC  Add  Memory  to  Accumulator  with 
Carry 

AND  "AND"  Memory  with  Accumulator 

ASL  Shift  Left  One  Bit  (Memory  or 
Accumulator) 

BCC  Branch  on  Carry  Clear 

BCS  Branch  on  Carry  Set 

BEQ  Branch  on  Result  Zero 

BIT  Test  Bits  in  Memory  with 

Accumulator 

BMI  Branch  on  Result  Minus 

BNE  Branch  on  Result  not  Zero 

BPL  Branch  on  Result  Plus 

BRK  Force  Break 

BVC  Branch  on  Overflow  Clear 

BVS  Branch  on  Overflow  Set 

CLC  Clear  Carry  Flag 

CLD  Clear  Decimal  Mode 

CLI  Clear  Interrupt  Disable  Sit 

CLV  Clear  Overflow  Flag 

CMP  Compare  Memory  and  Accumulator 

CPX  Compare  Memory  and  Index  X 

CPY  Compare  Memory  and  Index  Y 

DEC  Decrement  Memory  by  One 

DEX  Decrement  Index  X  by  One 

DEY  Decrement  Index  Y  by  One 

EOR  "Exclusive-Or"  Memory  with 
Accumulator 

INC  Increment  Memory  by  One 

INX  Increment  Index  X  by  One 

INY  increment  Index  Y  by  One 

JMP  Jump  to  New  Location 

JSR  Jump  to  New  Location  Saving 
Return  Address 


LDA  Load  Accumulator  with  Memory 

LDX  Load  Index  X  with  Memory 

LDY  Load  Index  Y  with  Memory 

LSR  Shift  Right  one  Bit  (Memory  or 
Accumulator) 

NOP  No  Operation 

ORA  "OR"  Memory  with  Accumulator 

PHA  Push  Accumulator  on  Stack 

PHP  Push  Processor  Status  on  Stack 

PLA  Pull  Accumulator  from  Stack 

PLP  Pull  Processor  Status  from  Stack 

ROL  Rotate  One  Bit  Left  (Memory  or 

Accumulator) 

ROR  Rotate  One  Bit  Right  (Memory  or 

Accumulator) 

RTI  Return  from  Interrupt 

RTS  Return  from  Subroutine 

SBC  Subtract  Memory  from  Accumulator 

with  Borrow 

SEC  Set  Carry  Flag 

SED  Set  Decimal  Mode 

SEI  Set  Interrupt  Disable  Status 

STA  Store  Accumulator  in  Memory 

STX  Store  Index  X  in  Memory 

STY  Store  Index  Y  in  Memory 

TAX  Transfer  Accumulator  to  Index  X 

TAY  Transfer  Accumulator  to  Index  Y 

TSX  Transfer  Stack  Pointer  to  Index  X 

TXA  Transfer  Index  X  to  Accumulator 

TXS  Transfer  Index  X  to  Stack  Pointer 

TYA  Transfer  Index  Y  to  Accumulator 
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THE  FOLLOWING  NOTATION 
APPLIES  TO  THIS  SUMMARY: 


A 

Accumulator 

X,  Y 

Index  Registers 

M 

Memory 

C 

Borrow 

P 

Processor  Status  Register 

S 

Stack  Pointer 

✓ 

Change 



No  Change 

+ 

Add 

A 

Logical  AND 

- 

Subtract 

V 

Logical  Exclusive  Or 

Transfer  From  Stack 

♦ 

Transfer  To  Stack 

Transfer  To 

Transfer  To 

V 

Logical  OR 

PC 

Program  Counter 

PCH 

Program  Counter  High 

PCL 

Program  Counter  Low 

OPER 

Operand 

# 

Immediate  Addressing  Mode 

FIGURE  1.  AS L -SHIFT  LEFT  ONE  BIT  OPERATION 


FIGURE  2.  ROTATE  ONE  BIT  LEFT  (MEMORY 
OR  ACCUMULATOR) 


L   7      6      5  4 


OR  A 


3      2  10 


FIGURE  3. 


NOTE  1:  BIT -TEST  BITS 

Bit  6  and  7  are  transferred  to  the  status  register.  If  the 
result  of  A  A  M  is  zero  then  Z=1.  otherwise  Z=0. 


PROGRAMMING  MODEL 


ACCUMULATOR 


INDEX  REGISTER  Y 


INDEX  REGISTER  X 


15 


PCH 


PCL 


PROGRAM  COUNTER 


01 


STACK  POINTER 


N 

V 

B 

D 

Z 

c 

PROCESSOR  STATUS  REGISTER,  "P" 


CARRY 
ZERO 

■  INTERRUPT  DISABLE 

■  DECIMAL  MODE 
BREAK  COMMAND 
OVERFLOW 

■  NEGATIVE 
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APPLE  II  HARDWARE 


1.  Getting  Started  with  Your  APPLE  II  Board 

2.  APPLE  II  Switching  Power  Supply 

3.  Interfacing  with  the  Home  TV 

4.  Simple  Serial  Output 

5.  Interfacing  the  APPLE  — 

Signals,  Loading,  Pin  Connections 

6.  Memory—  wM  AJJ 

Options,  Expansion,  Map,  Address 

7.  System  Timing 

8.  Schematics 
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GETTING  STARTED  WITH  YOUR  APPLE  II  BOARD 


INTRODUCTION 


ITEMS  YOU  WILL  NEED: 


Your  APPLE  II  board  comes  completely  assembled  and  thoroughly  tested, 
You  should  have  received  the  following: 

APPLE  II  P.C.  Board  complete  with 
specified  RAM  memory. 


2"  speaker  with  cable. 
Preliminary  Manual 


16K  or  greater:  3  cassettes. 

16  pin  headers  plugged  into  locations  A7 

and  J14. 


In  addition  you  will  need: 

g.    A  color  TV  set  (or  B  &  W)  equipped  with  a  direct 
video  input  connector  for  best  performance  or  a  com- 
mercially available  RF  modulator  such  as  a  "Pixi-verte^"*™ 
Higher  channel  (7-13)  modulators  generally  provide 
better  system  performance  than  lower  channel  modulators 
(2-6). 


a. 

1  ea. 

b. 

1  ea. 

c. 

1  ea. 

d. 

1  ea. 

e. 

1  ea. 

f. 

2  ea. 

h.    The  following  power  supplies  (NOTE:    current  ratings 
do  not  include  any  capacity  for  peripheral  boards.): 

1.  +12  Volts  with  the  following  current  capacity: 

a.  For  4K  or  16K  systems  -  350mA. 

b.  For  8K,  20K  or  32K       -  550mA. 

c.  For  12K,  24K,  36K  or  48K    -  850mA. 

2.  +5  Volts  at  1.6  amps 

3.  -5  Volts  at  10mA. 


4.    OPTIONAL:    If  -12  Volts  is  required  by  your  keyboard. 
(If  using  an  APPLE  II  supplied  keyboard,  you  will 
need  -12V  at  50mA.) 
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i.    An  audio  cassette  recorder  such  as  a  Panasonic  model 
RQ-309  DS  which  is  used  to  load  and  save  programs. 

j.    An  ASCII  encoded  keyboard  equipped  with  a  "reset" 
switch. 

k.    Cable  for  the  following: 

1.  Keyboard  to  APPLE  II  P.C.B. 

2.  Video  out  75  ohm  cable  to  TV  or  modulator 

3.  Cassette  to    APPLE  II  P.C.B.  (1  or  2) 
Optionally  you  may  desire: 

1.    Game  paddles  or  pots  with  cables  to  APPLE  II  Game  I/O 
connector.    (Several  demo  programs  use  PDL(O)  and 
"Pong"  also  uses  PDL(l). 

m.    Case  to  hold  all  the  above 

Final  Assembly  Steps 

1.  Using  detailed  information  on  pin  functions  in  hardware 
section  of  manual,  connect  power  supplies  to  d.c.  cable 
assembly.    Use  both  ground  wires  to  miminize  resistance. 
With  cable  assembly  disconnected  from  APPLE  II  mother 
board,  turn  on  power  supplies  and  verify  voltages  on 
connector  pins.    Improper  supply  connections  such  as  re- 
verse polarity  can  severely  damage  your  APPLE  II. 

2.  Connect  keyboard  to  APPLE  II  by  unplugging  leader  in 
location  A7  and  wiring  keyboard  cable  to  it,  then  plug 
back  into  APPLE  II  P.C.B. 

3.  Plug  in  speaker  cable. 

4.  Optionally  connect  one  or  two  game  paddles  using  leader 
supplied  in  socket  located  at  J14. 

5.  Connect  video  cable. 

6.  Connect  cable  from  cassette  monitor  output  to  APPLE  II 
cassette  input. 

7.  Check  to  see  that  APPLE  II  board  is  not  contacting  any 
conducting  surface. 

8     With  power  supplies  turned  off,  plug  in  power  connector 
to  mother  board  then  recheck  all  cableing. 
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POWER  UP 


1.  Turn  power -on.    If  power  supplies  overload,  immediately  turn  off 
and  recheck  power  cable  wiring.    Verify  operating  supply  voltages 
are  within  +3%  of  nominal  value. 

2.  You  should  now  have  random  video  display.    If  not  check  video 
level  pot  on  mother  board,  full  clockwise  is  maximum  video  out- 
put.   Also  check  video  cables  for  opens  and  shorts.  Check 
modulator  if  you  are  usinq  one. 


3.    Press  reset  button.    Speaker  should  beep  and  a  "*"  prompt 
character  with  a  blinking  cursor  should  appear  in  lower 
left  on  screen. 


4.    Press  "esc"  button,  release  and  type  a  "@"  (shift-P)  to 
clear  screen..  You  may  now  try  "Monitor"  commands  if  you 
wish.    See  details  in  "Monitor"  software  section. 


RUNNING  BASIC 

1.  Turn  power  on;  press  reset  button;  type  "control  B"  and  press 
return  button.    A  ">"  prompt  character  should  appear  on  screen 
indicating  that  you  are  now  in  BASIC. 

2.  Load  one  of  the  supplied  demonstration  cassettes  into  recorder. 
Set  recorder  level  to  approximately  5  and  start  recorder.  Type 
"LOAD"  and  return.    First  beep  indicates  that  APPLE  II  has  found 
beginning  of  program;  second  indicates  end  of  program  followed 
by  ">"  character  on  screen.    If  error  occurs  on  loading,  try  a 
different  demo  tape  or  try  changing  cassette  volume  level. 

3.  Type  RUN  and  carriage  return  to  execute  demonstration  program. 
Listings  of  these  are  included  in  the  last  section  of  this 
manual . 
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THE  APPLE  II  SWITCHING  POWER  SUPPLY 


Switching  power  supplies  generally  have  both  advantages  and  peculiarities 
not  generally  found  in  conventional  power  supplies.    The  Apple  II  user 
is  urged  to  review  this  section. 


Your  Apple  II  is  equipped  with  an  AC  line 
voltage  filter  and  a  three  wire  AC  line  cord. 
It  is  important  to  make  sure  that  the  third 
wire  is  returned  to  earth  ground.    Use  a  con- 
tinuity checker  or  ohnmeter   to  ensure  that 
the  third  wire  is  actually  returned  to  earth. 
Continuity  should  be  checked  for  between  the 
power  supply  case  and  an  available  water  pipe 
for  exanple.    The  line  filter,  which  is  of  a 
type  approved  by  domestic  (U.L.  CSA)  and 
international  (VDE)  agencies  must  be  returned 
to  earth  to  function  properly  and  to  avoid 
potential  shock  hazards. 


The  APPLE  II  power  supply  is  of  the  "flyback"  switching  type.  In 
this  system,  the  AC  line  is  rectified  directly,  "chopped  up"  by  a  high 
frequency  oscillator  and  coupled  through  a  small  transformer  to  the 
diodes,  filters,  etc.,  and  results  in  four  low  voltage  DC  supplies  to 
run  APPLE  II.    The  transformer  isolates  the  DC  supplies  from  the  line 
and  is  provided  with  several    shields  to  prevent  "hash"  from  being 
coupled  into  the  logic  or  peripherals.    In  the  "flyback"  system,  the 
energy  transferred  through  from  the  AC  line  side  to  DC  supply  side  is 
stored  in  the  transformer's  inductance  on  one-half  of  the  operating 
cycle,  then  transferred  to  the  output  filter  capacitors  on  the  second 
half  of  the  operating  cycle.    Similar  systems  are  used  in  TV  sets  to 
provide  horizontal  deflection  and  the  high  voltages  to  run  the  CRT. 

Regulation  of  the  DC  voltages  is  accomplished  by  controlling  the 
frequency  at  which  the  converter  operates;  the  greater  the  output  power 
needed,  the  lower  the  frequency  of  the  converter.    If  the  converter  is 
overloaded,  the  operating  frequency  will  drop  into  the  audible  range 
with  squeels  and  squawks  warning  the  user  that  something  is  wrong. 

All  DC  outputs  are  regulated  at  the  same  time  and  one  of  the  four 
outputs  (the  +5  volt  supply)  is  compared  to  a  reference  voltage  with 
the  difference  error  fed  to  a  feedback  loop  to  assist  the  oscillator 
in  running  at  the  needed  frequency.    Since  all  DC  outputs  are  regulated 
together,  their  voltages  will  reflect  to  some  extent  unequal  loadings. 
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For  example;  if  the  +5  supply  is  loaded  very  heavily,  then  all 
other  supply  voltages  will  increase  in  voltage  slightly;  conversely, 
very  light  loading  on  the  +5  supply  and  heavy  loading  on  the  +12 
supply  will  cause  both  it  and  the  others  to  sag  lightly.    If  precision 
reference  voltages  are  needed  for  peripheral  applications,  they  should 
be  provided  for  in  the  peripheral  design. 

In  general,  the  APPLE  II  design  is  conservative  with  respect  to 
component  ratings  and  operating  termperatures.    An  over- voltage  crowbar 
shutdown  system  and  an  auxilliary  control  feedback  loop  are  provided 
to  ensure  that  even  very  unlikely  failure  modes  will  not  cause  damage  to 
the  APPLE  II  computer  system.  The  over-voltage  protection  references  to 
the  DC  output  voltages  only.    The  AC  line  voltage  input  must  be  within 
the  specified  limits,  i.e.,  lp7V  to  132V. 


Since  the  output  voltages  are  controlled  by  changing  the  operating 
frequency  of  the  converter,  and  since  that  frequency  has  an  upper  limit 
determined  by  the  switching  speed  of  power  transistors,  there  then  must 
be  a  minimum  load  on  the  supply;  the  Apple  II  board  with  minimum  memory 
(4K)  is  well  above  that  minimum  load.    However,  with  the  board  discon- 
nected, there  is  no  load  on  the  supply,  and  the  internal  over-voltage 
protection  circuitry  causes  the  supply  to  turn  off.    A  9  watt  load 
distributed  roughly  50-50  between  the  +5  and  +12  supply  is  the  nominal 
minimum  load. 

Nominal  load  current  ratios  are:    The  +12V  supply  load  is  h  that  of  the  +5V. 

The  -  5V  supply  load  is  1/10  that  of  the  +5V. 
The  -12V  supply  load  is  1/10  that  of  the  +5V. 

The  supply  voltages  are  +5.p  +  p. 15  volts,  +11.8  +  0.5  volts,  -12. J8  +  IV, 
-5.2  +  0.5  volts.    The  tolerances  are  greatly  reduced  when  the  loads  are 
close  to  nominal . 

The  Apple  II  power  supply  will  power  the  Apple  II  board  and  all  present 
and  forthcoming  plug- in  cards,  we  recommend  the  use  of  low  power  TTL,  CMOS, 
etc.  so  that  the  total  power  drawn  is  within  the  thermal  limits  of  the  entire 
system.    In  particular,  the  user  should  keep  the  total  power  drawn  by  any 
one  card  to  less  than  1.5  watts,  and  the  total  current  drawn  by  all  the  cards 
together  within  the  following  limits: 


The  power  supply  is  allowed  to  run  indefinetly  under  short  circuit 
or  open  circuit  conditions. 


Under  no  circumstances,  should  more 
than  140  VAC  be  applied  to  the  input 
of  the  power  supply.    Permanent  damage 
will  result. 


+  12V 
+  5V 

-  5V 

-  12V 


use  no  more  than  250  mA 
use  no  more  than  5pp  mA 
use  no  more  than  2pp  mA 
use  no  more  than  2pp  mA 


CAUTION:    There  are  dangerous  high 
voltages  inside  the  power  supply 
case.    Much  of  the  internal  circuitry 
is  NOT  isolated  from  the  power  line, 
and  special  equipment  is  needed  for 
service.    NO  REPAIR  BY  THE  USER  IS 
ALLOWED. 
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NOTES  ON  INTERFACING  WITH  THE  HOME  TV 


Accessories  are  available  to  aid  the  user  in  connecting  the  Apple  II 
system  to  a  home  color  TV  with  a  minimum  of  trouble.    These  units  are  called 
"RF  Modulators"  and  they  generate  a  radio  frequency  signal  corresponding  to 
the  carrier  of  one  or  two  of  the  lower  VHF  television  bands;  61.25  MHz 
(channel  3)  or  67.25  MHz  (channel  4).    This  RF  signal  is  then  modulated  with 
the  composite  video  signal  generated  by  the  Apple  II. 

Users  report  success  with  the  following  RF  modulators: 

the  "PixieVerter"    (a  kit) 
ATV  Research 
13th  and  Broadway 
Dakota  City,  Nebraska  68731 

the  "TV-l"  (a  kit) 

UHF  Associates 
6037  Haviland  Ave. 
Whittier,  CA  90601 

the  "Sup-r-Mod"  by      (assembled  &  tested) 
M&R  Enterprises 
P.O.  Box  1011 
Sunnyvale,  CA  94088 

the  RF  Modulator  (a  P.C.  board) 

Electronics  Systems 
P.O.  Box  212" 
Burlingame,  CA  94010 

Most  of  the  above  are  available  through  local  computer  stores. 

The  Apple  II  owner  who  wishes  to  use  one  of  these  RF  Modulators  should 
read  the  following  notes  carefully. 

All  these  modulators  have  a  free  running  transistor  oscillator.  The 
M&R  Enterprises  unit  is  pre-tuned  to  Channel  4.    The  PixieVerter  and  the 
TV-l  have  tuning  by  means  of  a  jumper  on  the  P.C.  board  and  a  small  trimmer 
capacitor.    All  these  units  have  a  residual  FM  which  may  cause  trouble  if 
the  TV  set  in  use  has  a  IF  pass  band  with  excessive  ripple.    The  unit  from 
M&R  has  the  least  residual  FM. 

All  the  units  except  the  M&R  unit  are  kits  to  be  built  and  tuned  by 
the  -ustomer.    All  the  kits  are  incomplete  to  some  extent.    The  unit  from 
Electronics  Systems  is  just  a  printed  circuit  board  with  assembly  instructions. 
The  kits  from  UHF  Associates  and  ATV  do  not  have  an  RF  cable  or  a  shielded 
box  or  a  balun  transformer,  or  an  antenna  switch.    The  M&R  unit  is  complete. 

Some  cautions  are  in  order.    The  Apple  II,  by  virtue  of  its  color  qraphics 
capability,  operates  the  TV  set  in  a  linear  mode  rather  than  the  100%  contrast 
mode  satisfactory  for  displaying  text.    For  this  reason,  radio  frequency  inter- 
ference (RFI)  generated  by  a  computer  (or  peripherals)  will  beat  with  the 
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carrier  of  the  RF  modulator  to  produce  faint  spurious  background  patterns 
(called  "worms")    This  RFI  "trash"  must  be  of  quite  a  low  level  if  worms 
are  to  be  prevented.    In  fact,  these  spurious  beats  must  be  40  to  50db 
below  the  signal  level  to  reduce  worms  to  an  acceptable  level.    When  it  is 
remembered  that  only  2  to  6  mV  (across  3ppftJ  is  presented  to  the  VHF  input 
of  the  TV  set,  then  stray  RFI  getting  into  the  TV  must  be  less  than  50yV 
to  obtain  a  clean  picture.    Therefore  we  recommend  that  a  good,  co-ax 
cable  be  used  to  carry  the  signal  from  any  modulator  to  the  TV  set,  such 
as  RG/59u  (with  copper  shield),  Belden  #8241  or  an  equivalent  miniature 
type  such  as  Belden  #8218.    We  also  recommend  that  the  RF  modulator  be 
enclosed  in  a  tight  metal  box  (an  unpainted  die  cast  aluminum  box  such  as 
Pomona  #2428).    Even  with  these  precautions,  some  trouble  may  be  encountered 
with  worms,  and  can  be  greatly  helped  by  threading  the  coax  cable  conn- 
ecting the  modulator  to  the  TV  set  repeatedly  through  a  Ferrite  toroid  core. 
Apple  Computer  supplies  these  cores  in  a  kit, 'along  with  a  4  circuit 
connector/cable  assembly  to  match  the  auxilliary  video  connector  found  on 
the  Apple  II  board.    This  kit  has  order  number  A2MJ31J3X.    The  M&R  "Sup-r-Mod" 
is  supplied  with  a  coax  cable  and  toroids. 

Any  computer  containing  fast  switching  logic  and  high  frequency  clocks' 
will  radiate  some  'radio  frequency  energy.    Apple  II  is  equipped  with  a 
good  line  filter  and  many  other  precautions  have  been  taken  to  minimize 
radiated  energy.    The  user  is  urged  not  to  connect  "antennas"  to  this 
computer;  wires  strung  about  carrying  clocks  and/data  will  act  as  antennas, 
and  subsequent  radiated  energy  may  prove  to  be    a  nuisance. 

Another  caution  concerns  possible  long  term  effects  on  the  TV  picture 
tube.    Most  home  TV  sets  have  "Brightness"  and  "Contrast"  controls  with  a 
very  wide  ranqe  of  adjustment.    When  an  un-changing  picture  is  displayed 
with  high  brightness  for  a  long  period  ,a    faint  discoloration  of  the 
TV   CRT      may  occur  as  an  inverse  pattern  observable  with  the  TV  set 
turned  off.    This  condition  may  be  avoided  by  keeping  the  "Brightness" 
turned  down  slightly  and  "Contrast"  moderate. 
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A  SIMPLE  SERIAL  OUTPUT 


The  Apple  II  is  equipped  with  a  16  pin  DIP  socket  most  frequently 
used  to  connect  potentiometers,  switches,  etc.  to  the  computer  for 
paddle  control  and  other  game  applications.    This  socket,  located  at 
j-14,  has  outputs  available  as  well.    With  an  appropriate  machine 
language  program,  these  output  lines  may  be  used  to  serialize  data  in 
a  format  suitable  for  a  teletype.    A  suitable  interface  circuit  must 
be  built  since  the  outputs  are  merely  LSTTL  and  won't  run  a  teletype 
without  help.    Several  interface  circuits  are  discussed  below  and  the 
user  may  pick  the  one  best  suited  to  his  needs. 

The  ASR  -  33  Teletype 

The  ASR  -  33  Teletype  of  recent  vintage  has  a  transistor  circuit 
to  drive  its  solenoids.  This  circuit  is  quite  easy  to  interface  to, 
since  it  is  provided  with  its  own  power  supply.  (Figure  la)  It  can 
be  set  up  for  a  20mA  current  loop  and  interfaced  as  follows  (whether 
or  not  the  teletype  is  strapped  for  full  duplex  or  half  duplex  oper- 
ation): 

a)  The  yellow  wire  and  purple  wire  should  both  go  to 
terminal  9  of  Terminal  Strip  X.    If  the  purple  wire 
is  qoinq  to  terminal  8,  then  remove  it  and  relocate 
it  at  terminal  9.    This  is  necessary  to  change  from 
the  60mA  current  loop  to  the  20mA  current  loop. 

b)  Above  Terminal  Strip  X  is  a  connector  socket  identi- 
fied as  "2".    Pin  8  is  the  input  line  +  or  high;  Pin 
7  is  the  input  line  -  or  low.    This  connector  mates 
with  a  Molex  receptacle  model  1375  #03-09-2151  or 
#03-09-2153.    Recommended  terminals  are  Molex  #02-09- 
2136     An  alternate  connection  method  is  via  spade  lugs 
to  Terminal  Strip  X,  terminal  7  (the  +  input  line)  and 
6  (the  -  input  line). 

c)  The  following  circuit  can  be  built  on  a  16  pin  DIP 
component  carrier  and  then  plugged  into  the  Apple  s 
16  pin  socket  found  at  J-14:    (The  junction  of  the 

3  3k  resistor  and  the  transistor  base  lead  is  float- 
ing).   Pins  16  and  9  are  used  as  tie  points  as  they 
are  unconnected  on  the  Apple  board.    (Figure  la). 
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The  "RS  -  232  Interface" 

For  this  interface  to  be  legitimate,  it  is  necessary  to  twice  invert 
the  signal  appearing  at  J-14  pin  15  and  have  it  swing  more  than  5  volts 
both  above  and  below  ground.    The  following  circuit  does  that  but  requires 
that  both  +12  and  -12  supplies  be  used.    (Figure  2)    Snipping  off  pins 
on  the  DIP-component  carrier  will  allow  the  spare  terminals  to  be  used  for 
tie  points.    The  output  ground  connects  to  pin  7  of  the  DB-25  connector. 
The  signal  output  connects  to  pin  3  of  the  DB-25  connector.    The  "protective" 
ground  wire  normally  found  on  pin  1  of  the  DB-25  connector  may  be  connected 
to  the  Apple's  base  plate  if  desired.    Placing  a  #4  lug  under  one  of  the 
four  power  supply  mounting  screws  is  perhaps  the  simplest  method.    The  +12 
volt  supply  is  easily  found  on  the  auxiliary  Video  connector  (see  Figure  S-ll 
or  Figure  7  of  the  manual).    The  -12  volt  supply  may  be  found  at  pin  33  of 
the  peripheral  connectors  (see  Figure  4)  or  at  the  power  supply  connector 
(see  Figure  5  of  the  manual). 

A  Serial  Out  Machine  Center  Language  Program 

Once  the  appropriate  circuit  has  been  selected  and  constructed  a  machine 
language  program  is  needed  to  drive  the  circuit.    Figure  3  lists  such  a  tele- 
type output  machine  language  routine.    It  can  be  used  in  conjunction  with  an 
Integer  BASIC  program  that  doesn't  require  page  $300  hex  of  memory.  This 
program  resides  in  memory  from  $370  to  $3E9.    Columns  three  and  four  of  the 
listing  show  the  op-code  used.    To  enter  this  program  into  the  Apple  II  the 
following  procedure  is  followed: 

Entering  Machine  Language  Program 

1 .  Power  up  Apple  II 

2.  Depress  and  release  the  "RESET"  key.    An  asterick 
and  flashing  cursor  should  appear  on  the  left  hand 
side  of  the  screen  below  the  random  text  matrix. 

3.  Now  type  in  the  data  from  columns  one,  two  and  three 
for  each  line  from  $370  to  03E9.    For  example,  type  in 
"370:  A9  82"  and  then  depress  and  release  the  "RETURN" 
key.    Then  repeat  this  procedure  for  the  data  at  $372 
and  on  until  you  complete  entering  the  program. 

Executing  this  Program 

1.    From  BASIC  a  CALL  880  ($370)  will  start  the  execution  of 
this  program.    It  will  use  the  teletype  or  suitable  8p 
column  printer  as  the  primary  output  device. 
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2  PR#0  will  inactivate  the  printer  transfering  control 
back  to  the  Video  monitor  as  the  primary  output  dev.ce. 

3  in  Monitor  mode  $370G  activates  the  printer  and  hitting 
the  "RESET"  key  exits  the  program. 

Saving  the  Machine  Language  Program 

After  the  machine  language  program  has  been  entered  and  checked  for 
accuracy  it  should,  for  convenience,  be  saved  on  tape  -  that  is  unless 
you  prefer  to  enter  it  by  keyboard  every  time  you  want  to  use  it. 

The  way  it  is  saved  is  as  follows: 

1.  Insert  a  blank  program  cassette  into  the  tape 
recorder  and  rewind  it. 

2.  Hit  the  "RESET"  key.    The  system  should  move 
into  Monitor  mode.    An  asterick   *"  and  flash- 
ing cursor  should  appear  on  the  left-hand  side 
of  the  screen. 

3.  Type  in  "370.03E9W  370.03E9W". 

4.  Start  the  tape  recorder  in  record  mode  and  depress 
the  "RETURN"  key. 


5. 


When  the  program  has  been  written  to  tape,  the  asterick 
and  flashing  cursor  will  reappear. 


The  Program 

After  entering,  checking  and  saving  the  program  perform  the  following 
procedure  to  get  a  feeling  of  how  the  program  is  used: 

1.  Bc  (control  B)  into  BASIC 

2.  Turn  the  teletype  (printer  on) 

3.  Type  in  the  following 

10  CALL  880 

15  PRINT  "ABCD...XYZ01 123456789" 

20  PR#0 
25  END 

4     Type  in  RUN  and  hit  the  "RETURN"  key.  The 
'    text  in  line  15  should  be  printed  on  the 
teletype  and  control  is  returned  to  the  key- 
board and  Video  monitor. 
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Line  10  activates  the  teletype  machine  routine  and  all  "PRINT"  state- 
ments following  it  will  be  printed  to  the  teletype  until  a  PR#0  statement  is 
encountered.    Then  the  text  in  line  15  will  appear  on  the  teletype's  output. 
Line  20  deactivates  the  printer  and  the  program  ends  on  line  25. 

Conclusion 

With  the  circuits  and  machine  language  program  described  in  this  paper 
the  user  may  develop  a  relatively  simple  serial  output  interface  to  an  ASR-33 
or  RS-232  compatible  printers.    This  circuit  can  be  activated  through  BASIC 
or  monitor  modes.    And  is  a  valuable  addition  to  any  users  program  library. 
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INTERFACING  THE  APPLE 


This  section  defines  the  connections  by  which  external  devices  are 
attached  to  the  APPLE  II  board.  Included  are  pin  diagrams,  signal 
descriptions,  loading  constraints  and  other  useful  information. 
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Figure  1A   APPLE  II  Board-Complete  View 
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CASSETTE  JACKS 


A  convenient  means  for  interfacing  an  inexpensive  audio  cassette 
tape  recorder  to  the  APPLE  II  is  provided  by  these  two  standard 
(3.5mm)  miniature  phone  jacks  located  at  the  back  of  the  APPLE  II 
board. 


CASSETTE  DATA  IN  JACK:    Designed  for  connection  to  the  "EARPHONE" 
or  "MONITOR"  output  found  on  most  audio  cassette  tape  recorders. 
VjN=lVpp  (nominal),  ZjN=12K  Ohms.    Located  at  K12  as  illustrated  in 
Figure  1 . 


CASSETTE  DATA  OUT  JACK:    Designed  for  connection  to  the  "MIC"  or 
"MICROPHONE"  input  found  on  most  audio  cassette  tape  recorders. 
VQUI=25  mV  into  1W  Ohms,  ZQUT=1 00  Ohms .    Located  at  K13  as  illustrated 
in  Figure  1 . 


GAME  I/O  CONNECTOR 

The  Game  I/O  Connector  provides  a  means  for  connecting  paddle  controls, 
lights  and  switches  to  the  APPLE  II  for  use  in  controlling  video  games, 
etc.    It  is  a  16  pin  IC  socket  located  at  J14  and  is  illustrated  in 
Figure  1  and  2. 


Figure  2  GAME  I/O  CONNECTOR 


(  Front  Board 


+5V  7 
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SW1  3 

SW2  4 
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9  N.C. 


C040  STB  5 


PDLO  6 
PDL2  7 
GND  8 


LOCATION  J1 4 
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SIGNAL  DESCRIPTIONS  FOR  GAME  I/O 


AN0-AN3:        8  addresses  (C058-C05F)  are  assigned  to  selectively 
"SET"  or  "CLEAR"  these  four  "ANNUNCIATOR"  outputs. 
Envisioned  to  control  indicator  lights,  each  is  a 
74LSxx  series  TTL  output  and  must  be  buffered  if  used 
to  drive  lamps. 

C(?4Qf  STB:  A  utility  strobe  output.  Will  go  low  during  02  of  a 
read  or  write  cycle  to  addresses  C040-C04F.  This  is 
a  74LSxx  series  TTL  output. 

GND:  System  circuit  ground.    0  Volt  line  from  power  supply. 

NC:  No  connection. 

PDL0-PDL3*      Paddle  control  inouts.    Requires  a  0-150K  ohm  variable 
resistance  and  +5V  for  each  paddle.    Internal  100  ohm 
resistors  are  provided  in  series  with  external  pot  to 
prevent  excess'  current  if  pot  goes  completely  to  zero 
ohms. 

SW0-SW2:        Switch  inputs.    Testable  by  reading  from  addresses 
C061-C063  (or  C069-C06B).    These  are  uncommitted 
74LSxx  series  inputs. 

+5V:  Positive  5-Volt  supply.  To  avoid  burning  out  the  connector 

pin,  current  drain  MUST  be  less  than  100mA. 


KEYBOARD  CONNECTOR 

This  connector  provides  the  means  for  connecting  as  ASCII  keyboard 
to  the  APPLE  II  board.    It  is  a  16  pin  IC  socket  located  at  A7  and  is 
illustrated  in  Figures  1  and  3. 


igure  3        KEYBOARD  CONNECTOR 


TOP  VIEW 
(  Front  Edge  of  PC  Board) 
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B3 

GND 
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9 
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LOCATION  A7 
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SIGNAL  DESCRIPTION  FOR  KEYBOARD  INTERFACE 


B1-B7:    7  bit  ASCII  data  from  keyboard,  positive  logic  (high  level= 
"1"),  TTL  logic  levels  expected. 

GND:      System  circuit  ground.    0  Volt  line  from  power  supply. 


NC:        No  connection. 

RESET:    System  reset  input.    Requires  switch  closure  to  ground. 

STROBE:  Strobe  output  from  keyboard.    The  APPLE  II  recognizes  the 
positive  going  edge  of  the  incoming  strobe. 

+5V:      Positive  5-Volt  supply.    To  avoid  burning  out  the  connector 
pin,  current  drain  MUST  be  less  than  lppmA. 

-12V:     Negative  12-Volt  supply.    Keyboard  should  draw  less  than 
50mA. 


PERIPHERAL  CONNECTORS 

The  eight  Peripheral  Connectors  mounted  near  the  back  edge  of  the 
APPLE  II  board  provide  a  convenient  means  of  connecting  expansion 
hardware  and  peripheral  devices  to  the  APPLE  II  I/O  Bus.    These  are 
Winchester  #2HW25C0-111  (or  equivalent)  50  pin  card  edge  connectors 
with  pins  on  .10"  centers.    Location  and  pin  outs  are  illustrated  in 
Figures  1  and  4. 


SIGNAL  DESCRIPTION  FOR  PERIPHERAL  I/O 

A0-A15:         16  bit  system  address  bus.    Addresses  are  set  up  by  the 
6502  within  300nS  after  the  beginning  of  0-j.    These  lines 
will  drive  up  to  a  total  of  16  standard  TTL  loads. 

•DEVICE  SELECT:  Sixteen  addresses  are  set  aside  for  each  peripheral 
connector.  A  read  or  write  to  such  an  address  will 
send  pin  41  on  the  selected  connector  low  during  02 
(5ppnS).    Each  will  drive  4  standard  TTL  loads. 

D0-D7:  8  bit  system  data  bus.    During  a  write  cycle  data  is 

set  up  by  the  6502  less  than  300nS  after  the  beginning 
of  09.    During  a  read  cycle  the  6502  expects  data  to 
be  ready  no  less  than  100nS  before  the  end  of  02- 
These  lines  will  drive  up  to  a  total  of  8  total  low 
power  schottky  TTL  loads. 
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Direct  Memory  Access  control  output.    This  line  has  a 
3K  Ohm  pull  up  to  +5V  and  should  be  driven  with  an 
open  collector  output. 

Direct  Memory  Access  daisy  chain  input  from  higher 
priority  peripheral  devices.  Will  present  no  more 
than  4  standard  TTL  loads  to  the  driving  device. 

Direct  Memory  Access  daisy  chain  output  to  lower 
priority  peripheral  devices.    This  line  will  drive 
4  standard  TTL  loads. 

System  circuit  ground.    0  Volt  line  from  power  supply. 

Inhibit  Line.    When  a  device  pulls  this  line  low,  all 
ROM's  on  board  are  disabled  (Hex  addressed  D000  through 
FFFF).    This  line  has  a  3K  Ohm  pullup  to  +5V  and 
should  be  driven  with  an  open  collector  output. 

Interrupt  daisy  chain  input  from  higher  priority  peri- 
pheral devices.    Will  present  no  more  than  4  standard 
TTL  loads  to  the  driving  device. 

Interrupt  daisy  chain  output  to  lower  priority  peri- 
pheral devices.  This  line  will  drive  4  standard  TTL 
loads. 

256  addresses  are  set  aside  for  each  peripheral  connector 
(see  address  map  in  "MEMORY"  section).    A  read  or  write 
of  such  an  address  will  send  pin  1  on  the  selected 
connector  low  during  02  (500nS).    This  line  will  drive 
4  standard  TTL  loads. 

Pin  20  on  all  peripheral  connectors  will  go  low  during 
0O  of  a  read  or  write  to  any  address  C800-CFFF.  This 
Une  will  drive  a  total  of  4  standard  TTL  loads. 

Interrupt  request  line  to  the  6502.    This  line  has  a 
3K  Ohm  pullup  to  +5V  and  should  be  driven  with  an  open 
collector  output.    It  is  active  low. 

No  connection. 

Non  Maskable  Interrupt  request  line  to  the  6502.  This 
line  has  a  3K  Ohm  pullup  to  +5V  and  should  be  driven  with 
an  open  collector  output.    It  is  active  low. 

A  1MHz  (nonsymmetrical)  general  purpose  timing  signal.  Will 
drive  up  to  a  total  of  16  standard  TTL  loads. 

"Ready"  line  to  the  6502.    This  line  should  change  only 
during  0,,  and  when  low  will  halt  the  microprocessor  at 
the  next  READ  cycle.    This  line  has  a  3K  Ohm  pullup  to 
+5V  and  should  be  driven  with  an  open  collector  output. 

Reset  line  from  "RESET"  key  on  keyboard.    Active  low.  Will 
drive  2  MOS  loads  per  Peripheral  Connector. 
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R/W:  READ/WRITE  line  from  65j02 .    When  high  indicates  that  a  read 

cycle  is  in  progress,  and  when  low  that  a  write  cycle  is 
in  progress.    This  line  will  drive  up  to  a  total  of  16 
standard  TTL  loads. 

USER  1 :      The  function  of  this  line  will  be  described  in  a  later 
document. 

(L^  Microprocessor  phase  0*  clock.    Will  drive  up  to  a  total  of 

16  standard  TTL  loads. 

0,j_  Phase  1  clock,  complement  of  0n.    Will  drive  up  to  a  total 

1  of  16  standard  TTL  loads.  u 

7M:  Seven  MHz  high  frequency  clock.    Will  drive  up  to  a  total 

of  16  standard  TTL  loads. 

+12V:  Positive  12- Volt  supply. 

+5V:  Possitive  5-Volt  supply 

-5V:  Negative  5-Volt  supply. 

-12V:  Negative  12-Volt  supply. 


POWER  CONNECTOR 

The  four  voltages  required  by  the  APPLE  II  are  supplied  via  this 
AMP  #9-35028-1,6  pin  connector.    See  location  and  pin  out  in  ngures 
1  and  5. 


PIN  DESCRIPTION 

GND:  (2  pins)  system  circuit  ground.    0  Volt  line  from  power 

supply. 

+12V:         Positive  12-Volt  line  from  power  supply. 
+5V:  Positive  5-Volt  line  from  power  supply. 

-5V:  Negative  5-Volt  line  from  power  supply. 


-12V:         Negative  5-Volt  line  from  power  supply. 
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Figure  4  PERIPHERAL  CONNECTORS 
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SPEAKER  CONNECTOR 

This  is  a  MOLEX  KK  100  series  connector  with  two  .25"  square  pins  on 
.10"  centers.    See  location  and  pin  out  in  Figures  1  and  6. 

SIGNAL  DESCRIPTION  FOR  SPEAKER 
+5V:  System  +5  Volts 

SPKR:  Output  line  to  speaker.    Will  deliver  about  .5  watt  into 

8  Ohms. 


Figure  6 


SPEAKER  CONNECTOR 


o 

CD 

C7> 

-O  T3 
LU  S- 
rd 

+J  O 
C  CD 

o 


> 

in 

+ 


CL 
CO 


PINOUT 


HE 


Right  Edge  of  PC  3oard 

LOCATION  B14A 


VIDEO  OUTPUT  JACK 

This  standard  RCA  phono  jack  located  at  the  back  edge  of  the  APPLE  II 
P.C.  board  will  supply  NTSC  compatible,  EIA  standard,  positive  composite 
video  to  an  external  video  monitor. 

A  video  level  control  near  the  connector  allows  the  output  level  to  be 
adjusted  from  0  to  1  Volt  (peak)  into  an  external  75  OHM  load. 

Additional  tint  (hue)  range  is  provided  by  an  adjustable  trimmer  capacitor. 

See  locations  illustrated  in  Figure  1. 
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AUXILIARY  VIDEO  OUTPUT  CONNECTOR 


This  is  a  MOLEX  KK  100  series  connector  with  four  .25"  square  pins 
on  .10"  centers.  It  provides  composite  video  and  two  power  supply 
voltages.  Video  out  on  this  connector  is  not  adjustable  by  the  on 
board  200  Ohm  trim  pot.    See  Figures  1  and  7. 


SIGNAL  DESCRIPTION 

GND:  System  circuit  ground.    0  Volt  line  from  power  supply. 


VIDEO:        NTSC  compatible  positive  composite  VIDEO.    DC  coupled 
emitter  follower  output  (not  short  circuit  protected). 
SYNC  TIP  is  0  Volts,  black  level  is  about  .75  Volts,  and 
white  level  is  about  2.0  Volts  into  470  Ohms.    Output  level 
is  non-adjustable. 

+12V:         +12  Volt  line  from  power  supply. 

-5V:  -5  Volt  line  from  power  supply. 


Figure  7 
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INSTALLING  YOUR  OWN  RAM 


THE  POSSIBILITIES 

The  APPLE  II  computer  is  designed  to  use  dynamic  RAM  chips  organized 
as  4096  x  1  bit,  or  16384  x  1  bit  called  H4K"  and  "16K"  RAMs 
respectively.    These  must  be  used  in  sets  of  8  to  match  the  system 
data  bus  (which  is  8  bits  wide)  and  are  organized  into  rows  of  8. 
Thus,  each  row  may  contain  either  4096  (4K)  or  16384  (16K)  locations 
of  Random  Access  Memory  depending  upon  whether  4K  or  16K  chips  are 
used.    If  all  three  rows  on  the  APPLE  II  board  are  filled  with  4K 
RAM  chips,  then  12288  (12K)  memory  locations  will  be  available  for 
storing  programs  or  data,  and  if  all  three  rows  contain  16K  RAM 
chips  then  49152  (commonly  called  48K)  locations  of  RAM  memory  will 
exist  on  board! 


RESTRICTIONS 

It  is  quite  possible  to  have  the  three  rows  of  RAM  sockets  filled  with 
any  combination  of  4K  RAMs,  16K  RAMs  or  empty  as  long  as  certain  rules 
are  followed: 

1.    All  sockets  in  a  row  must  have  the  same  type  (4K  or  16K) 


2.    There  MUST  be  RAM  assigned  to  the  zero  block  of  addresses. 


ASSIGNING  RAM 

The  APPLE  II  has  48K  addresses  available  for  assignment  of  RAM  memory. 
Since  RAM  can  be  installed  in  increments  as  small  as  4K,  a  means  of 
selecting  which  address  range  each  row  of  memory  chips  will  respond 
to  has  been  provided  by  the  inclusion  of  three  MEMORY  SELECT  sockets 
on  board. 


RAMs . 


Figure  8 


MEMORY  SELECT  SOCKETS 


TOP  VIEW 


PINOUT 


(OOOO-OFFF)  4K  "0"  BLOCK  7 

(1000-1 FFF)  4K  "1"  BLOCK  2 

(2000-2FFF)  4K  "2"  BLOCK  3 
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9  16K  "4"  BLOCK  (4000-7FFF) 

8  1 6K  "8"  BLOCK  (8000-BFFF) 


LOCATIONS  D1,  E1,  F1 


133 


MEMORY 


TABLE  OF  CONTENTS 

1 .  INTRODUCTION 

2.  INSTALLING  YOUR  OWN  RAM 

3.  MEMORY  SELECT  SOCKETS 

4.  MEMORY  MAP  BY  4K  BLOCKS 

5.  DETAILED  MAP  OF  ASSIGNED  ADDRESSES 

INTRODUCTION 

APPLE  II  is  supplied  completely  tested  with  the  specified  amount  of 
RAM  memory  and  correct  memory  select  jumpers.    There  are  five  different 
sets  of  standard  memory  jumper  blocks: 

1.  4K  4K  4K  BASIC 

2.  4K  4K  4K  HIRES 

3.  16K  4K  4K 

4.  16K  16K  4K 

5.  16K  16K  16K 

A  set  of  three  each  of  one  of  the  above  is  supplied  with  the  board. 
Type  1  is  supplied  with  4K  or  8K  systems.    Both  type  1  and  2  are 
supplied  with  12K  systems.    Type  1  is  a  contiguous  memory  range  for 
maximum  BASIC  program  size.    Type  2  is  non-contiguous  and  allows  8K 
dedicated  to  HIRES  screen  memory  with  approximately  2K  of  user  baml 
space.    Type  3  is  supplied  with  16K,  20K  and  24K  systems.    Type  4 
with  30K  and  36K  systems  and  type  5  with  48K  systems. 

Additional  memory  may  easily  be  added  just  by  plugging  into  sockets 
along  with  correct  memory  jumper  blocks. 

The  6502  microprocessor  generates  a  16  bit  address,  which  allows 
65536  (commonly  called  65K)  different  memory  locations  to  be  specified. 
For  convenience  we  represent  each  16  bit  (binary)  address  as  a  4-digit 
hexadecimal  number.    Hexadecimal  notation  (hex)  is  explained  in  the 
Monitor  section  of  this  manual. 

In  the  APPLE  II,  certain  address  ranges  have  been  assigned  to  RAM 
memory,  ROM  memory,  the  I/O  bus,  and  hardware  functions.    The  memory 
and  address  maps  give  the  details. 
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MEMORY  SELECT  SOCKETS 


The  location  and  pin  out  for  memory  select  sockets  are  illustrated 
in  Figures  1  and  8. 


HOW  TO  USE 

There  are  three  MEMORY  SELECT  sockets,  located  at  Dl ,  El  and  Fl 
respectively.    RAM  memory  is  assigned  to  various  address  ranges  by 
inserting  jumper  wires  as  described  below.    All  three  MEMORY  SELECT 
sockets  MUST  be  jumpered  identically!    The  easiest  way  to  do  this 
is  to  use  Apple  supplied  memory  blocks. 

Let  us  learn  by  example: 

If  you  hav6  plugged  16K  RAMs  into  row  "C"  (the  sockets  located  at 
C3-C10  on  the  board),  and  you  want  them  to  occupy  the  first  16K  of 
addresses  starting  at  0000,  jumper  pin  14  to  pin  10  on  all  three 
MEMORY  SELECT  sockets  (thereby  assigning  row  "C"  to  the  0000-3FFF 
range  of  memory). 

If  in  addition  you  have  inserted  4K  RAMs  into  rows  "D"  and  "E",  and 
you  want  them  each  to  occupy  the  first  4K  addresses  starting  at  4000 
and  5000  respectively,  jumper  pin  13  to  pin  5  (thereby  assigning  row 
"D"  to  the  4000-4FFF  range  of  memory),  and  jumper  pin  12  to  pin  6 
(thereby  assigning  row  "E"  to  the  5000-5FFF  range  of  memory).  Remember 
to  jumper  all  three  MEMORY  SELECT  sockets  the  same. 

Now  you  have  a  large  contiguous  range  of  addresses  filled  with  RAM 
memory.    This  is  the  24K  addresses  from  0000-5FFF. 

By  following  the  above  examples  you  should  be  able  to  assign  each 
row  of  RAM  to  any  address  range  allowed  on  the  MEMORY  SELECT  sockets. 
Remember  that  to  do  this  properly  you  must  know  three  things: 

1.  Which  rows  have  RAM  installed? 

2.  Which  address  ranges  do  you  want  them  to 
occupy? 

3.  Jumper  all  three  MEMORY  SELECT  sockets  the 
same! 

If  you  are  not  sure  think  carefully,  essentially  all  the  necessary 
information  is  given  above. 
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Memory  Address  Allocations  in  4K  Bytes 


0000 


1000 


2000 


3000 


4000 


5000 


6000 


7000 


text  and  color  graphics 
display  pages,  6502  stack, 
pointers,  etc. 


high  res  graphics  display 
primary  page 


high  res.  graphics  display 
secondary  page 


6000 


9000 


A000 


B000 


C000 


D000 


£000 


F000 


Memory  Map  Pages  0  to  BFF 


addresses  dedicated  to 
hardware  functions 


ROM  socket  DO:  spare 

ROM  socket  D8:  spare 

ROM  socket  EO:  BASIC 

m 

ROM  socket  £8:  BASIC 

it 

ROM  socket  FO:  BASIC 

utility 

ROM  socket  F8:  monitor 


HEX 

USED 
vcv 

USED  FOB 

COMMENTS 

ADDRESS (ES) 
PAGE  fcERO 

DI 

UTILITY 

register  area  for  "sweet  16" 
16  bit  firmware  processor. 

OOOO-OOlV 

0020-004D 

MONITOR 

004E-004F 

MONITOR 

holds  m  16  bit  number  that 
is  randomized  with  each  key 
entry. 

0050-0055 

UTILITY 

integer  multiply  and  divide 
work  space. 

0055-OOFF 

BASIC 

OOFO-  OOFF 

UTILITY 

floating  point  work  space. 

PAGE  ONE 

6502 

subroutine  return  stack. 

OlOO-OlFF 

PAGE  TWO 

character  input  buffer. 

0200-02FF 

PAGE  THREE 

MONITOR 

Y    (control  Y)  will  cause 
acJSR  to  this  location. 

03#8 

03FB 

NMI's  are  vectored  to  this 
location. 

03FE-03FF 

IRQ's  are  vectored  to  the 
address  pointed  to  by  these 
locations. 

0400-07FF 

DISPLAY 

text  or  color  graphics 
primary  page. 

0800-OHFF 

DISPLAY 

text  or  color  graphics 
secondary  page. 

BASIC  initializes 
LQHEM  to  location 
0800. 

136 


I/O  and  ROM  Address  Detail 

Ht  A 

ADDRESS 

ASSIGNED  FUNCTION 

COMMENTS 

COOX 

Keyboard  input . 

Keyboard  strobe  appears  in  bit 

1           A  CPT  T     A  q  +■  o     f  rAm  -vA 
t  .       iiOV^il    LlctLd    J.  POIH  KSyDOELrQ 

appears  in  the  7  lower  bits. 

COlA 

iiear  KeyDoara  stroDe. 

Toggle  cassette  output . 

C03X 

Toggle  speaker  output . 

C04A 

U04U  oId 

Output  strooe  to  Game  I/O 
connector . 

C050 

Set  graphics  mode 

C051 

M  text 

C052 

Set  bottom  4  lines  graphics 

C053 

text 

C054 

Display  primary  page 

C055 

"        secondary  page 

C056 

Set  high  res.  graphics 

C057 

"  color 

C058 
C059 

Clear  "ANO" 
Set 

Annunciator  0    output  to 
Game  I/O  connector. 

C05A 
C05B 

Clear  "AN1" 
Set 

Annunciator  1  output  to 
Game  I/O  connector. 

C05C 
C05D 

Clear  "AN2" 
Set 

Annunciator  2  output  to 
Game  I/O  connector. 

C05E 
C05F 

Clear  "AN3" 
Set 

Annunciator  3  output  to 
Game  I/O  connector. 
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HEX 

ADDRESS 

ASSIGNED  FUNCTION 

COMMENTS 

C060/8 
C061/9 

Cassette  input 
MSW1M 

State  of  nCassette  Data  InM 
appears  in  bit  7. 

input  on 
State  of  Switch  1     A  Game 
I/O  connector  appears  in  bit  7. 

C062/A 

MSW2M 

State  of  Switch  2  input  on 
Game  I/O  connector  appears 
in  bit  7. 

C063/B 

nSW3" 

State  of  Switch  3  input  on 
Game  I/O  connector  appears 
in  bit  7. 

C064/C 

Paddle  0  timer  output 

State  of  timer  output  for 
Paddle  0  appears  in  bit  7. 

C065/D 

M                ^                M  ?! 

State  of  timer  output  for 
Paddle  1  appears  in  bit  7. 

C066/E 

n         2         M  M 

State  of  timer  output  for 
Paddle  2  appears  in  bit  7. 

C067/F 

IT         g         n  n 

State  of  timer  output  for 
Paddle  3  appears  in  bit  7. 

C07X 

"PDL  STB" 

Triggers  paddle  timers 
during  02 . 

C08X 
C09X 

DEVICE  SELECT  0 

1 

Pin  41  on  the  selected 
Peripheral  Connector  goes 
low  during  0o. 

COAX 

2 

COBX 

3 

COCX 

4 

CODX 

5 

COEX 

6 

COFX 

7 

ClOX 

8 

Expansion  connectors , 

C11X 

9 

IT 

C12X 

A 

M 
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HEX 

ADDRESS 

ASSIGNED 

FUNCTION 

COMMENTS 

ClOA 

DEVICE  SELECT 

B 

C14X 

T! 

C 

f~\  -1  cv 

1 1 

D 

0*1  cv 

II 

E 

C17X 

It 

F 

C1XX 
C2XX 

I/O  SELECT 

If 

1 

2 

Pin  1  on  the  selected 
Peripheral  Connector  goes 
low  during  • 

C3XX 
C4XX 
C5XX 
C6XX 

Tt 
IT 
1! 
It 

3 
4 

6 

NOTES : 

1.  Peripheral  Connector 
0  does  not  get  this 
signal . 

2.  I/O  SELECT    1  uses  the 
same  addresses  as 
DEVICE  SELECT  8-F. 

C7XX 

tt 

7 

pQVV 

tt 

8,   I/O  STROBE 

Expansion  connectors . 

cyxx 

tt 

9, 

O  A  VV 

tt 

A, 

CBaa 

tt 

B, 

C*C*  VV 

CLaa 

tl 

C, 

cdaa 

It 

D, 

/1 T  VV 

t! 

E, 

PXPW 
LJ?AA 

tl 

F, 

UUUU—  JJ  4  r  r 

ROM  socket 

DO 

Spare . 

tt  ti 

D8 

Spare . 

PAAA  T?r7T?T? 

iiUUU— Hj  #  r  j 

it  tt 

EO 

BASIC . 

rioUU— iir  r  r 

tt  tt 

E8 

BASIC . 

n  n  n — i?  7  in? 

tt  tt 

FO 

IK.  Ox  BAolC,   IK  01  utility. 

F800-FFFF 

11  tt 

F8 

Monitor. 
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SYSTEM  TIMING 


STGNAL  DESCRIPTIONS 

14M-  Master  oscillator  output,  14.318  MHz  +/-  35  ppm.    All  other 

— "  timing  signals  are  derived  from  this  one. 

7M:  Intermediate  timing  signal,  7.159  MHz. 

COLOR  rep:  Color  reference  frequency  used  by  video  circuitry,  3.530  MHz, 
0O:  Phase  p  clock  to  microprocessor,  1.023  MHz  nominal. 


Q3: 


Microprocessor  phase  1  clock,  complement  of  0O,  1-023  MHz 
nominal . 

Same  as  0,.  Included  here  because  the  6502 .hardware  and 
programing  manuals  use  the  designation  02  instead  of  0„. 

a  npnpral  DurDOse  timing  signal  which  occurs  at  the  same 
rate   as  the  m^croproceLor  clocks  but  is  nonsymmetrical. 


MICROPROCESSOR  OPERATIONS 
ADDRESS: 


The  address  from  the  microprocessor  changes  during  0!, 
and  is  stable  about  300nS  after  the  start  of  9i- 


300nS  after  the  start  of  02. 

to  the  end  of  02- 

SYSTEM  TIMING  DIAGRAM 


TIMING  CIRCUITRY 
BLOCK  DIAGRAM 


MASTER 
OSCILLATOR 


TIMING 
CIRCUITRY 


TIMING  RELATIONSHIPS 


-<14M> 


jinnjinnnjuumnnnnnnnjinjinnjuinniL 


-^COLOR  REF)  J        1        I  I 


<7M> 


<±E>  1 


<H>  J 
1 


4>2 
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REFERENCE 

OSCILLATOR 

AND 

SYSTEM 

TIMING 


FIG.  S-3 


HPE 


SYNC 
COUNTER 


FIG.  S^t 


— ^  SYNC  OUT  BUS 


TIMING  BUS 


MPU 
AND 
BUS 

DRIVERS 


FIG.  S-2 


ADDRESS  BUS 


t 

w 

•D 

CO 

< 

2 

o 

—      TIMING  BUS 

1  I  I  I  IT 


VIDEO 

GENERATOR 


FIG.  S-11 


)  COMPOSITE  VIDEO  OUT 


»  AUXILIARY  VIDEO  OUT 


DATA  BUS 


ADDRESS  BUS 


DATA  OUT 


8K-12K 

ROM 

MEMORY 

BASIC 

AND 

SYSTEM 

MONITOR 

FIG.  S-5 


4K/16K 

RAM 

SELECT 


FIG.  S-6 


DATA  IN 


RAM 
ROW 
SELECT 


4K  -  48K 
RAM 

MEMORY 


FIG.  S-8 


RAM 

ADDRESS 
SELECT 


RAM 

ADDRESS 
MUX 


FIG.  S-7 


TO  ALL  SECTIONS 


POWER  IN 
+  12V 

+  5V 

-5V 
-12V 
GND 


PERIPHERAL 
I/O 


FIG.  S-9 


—  ADDRESS  DECODE  — 


8  DECODED 
PERIPHERAL 
CONNECTORS 


ON-BOARD 
I/O 


FIG.  S-10 


DATA  OUT 


0  GAME  I/O 


4  CASSETTE  IN 

EZE 


t  CASSETTE  OUT 

EX 


4  KEYBOARD 

rzr 


»  SPEAKER 


DMA  BUS 


FIGURE  S- 1   APPLE  II  SYSTEM  DIAGRAM 
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2  <ADO> 

3  <AD1 

4 


8T97 

(PINS  1  A  15  TR I  STATE) 
11^12  9 


h5V 

t. 


<AD2>- 


5  <  AD3>- 


6  <  AD4> 

7  <  AD5V 


3  <AD6> 
9  <AD7V 


SYSTEM 
ADDRESS  ^ 
BUS 


0  <  AD8>- 
<AD9>- 


2  <adio^  H4 

3  <AD11>  


<AD12> 


<AD13>- 


6  <AD14> 

7  <AD15>- 


a  <R/W>- 


FROM  PERIPHERAL  l/O's 
SEE  FIG  S-9 


22  <DMA>- 

40  <  4>Q  >- 

FROM  REFERENCE 
OSCILLATOR  AND  TIMING 
SEE  FIG.  S-3 


14  £N 


22 


H5 


C11, 


Vcc 


IRQ 


RES 


DO 


01 


MPU 

6502  D2 


D3 


-<  IRQ)  30 


I  RA01 

I  tyW — ► 

3-3K  _ 

~?  (NMI>  29 

RA01  >  f 

I  > 

3.3K  ,  v 

-i  (RDY>  21 

RA01   ' 

I  — * 


FROM 
V  PERIPHERAL  I/O'S 
SEE  FIG.  S-9 


3.3K 


33 


|  RA01 

I  VV\f  ► 

_J><t 

H11 


FROM  KEYBOARD  AND 
S 


3.3K 


/  D-c  i         rHUM  KcYoUAH 
"\Q£k/  Jl    PERIPHERAL  I/O 
SEE  FIG.  S-9  &  S-11 

■<DA0>  49 


32 

3  . 

^4 

H1(P 

^  2 

31 

13. 

^J2 

H10 

^T4 

30 

13  . 

^|  T2 

H11 

^  14 

DA1  >  48 


-<DA2> 


-<DA3> 


29  <INH 


36  <  7M  > 

37  <  Q3  > 
33  <  <M  > 

39  <USER  1  > 
20  <  I/O  SEL> 
'8  <R/W> 


AVAILABLE  ON 
>  50  PIN  PERIPHERAL 
I/O  CONNECTOR 


TRISTATE 
SYSTEM 
DATA 
BUS 


J 


NOT  AVAILABLE  ON 
50  PIN  PERIPHERAL 
I/O  CONNECTOR 


<  7M  > 

(  COLOR  REF) 


FIGURE  S-2  MPU  AND  SYSTEM  BUS 
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FROM 
SYSTEM 
TIME 

FIG.  S-3 


CLOCK  IN 


SOFT  5  +5V 

J6 

7 


2 


VcC 
CEP 

CET 
CLR 
PO 
P1 
P2 
P3 
CL 


00 

D14  Q1 

02 

Q3 
74LS161 


PE 

TC  GND 


SOFT  5  +5V 


15  J8 


14 


13 


12 


10 


Vcc  CET  CEP 
CLR  PE 


P2 


D13 


02 


PO  QO 

74LS161 
P1  01 


CL 


Q3 
P3 

TC  GND 


+  5V 


15  j8 


12 


10 


VCc  CET  CEP 
PO  QO 

P2    D12  <X 

P3  Q2 

74LS161 
CLR  Q3 


P1 
CL 


PE 

TC  GND 


-5V 


SOFT  5  1 

 6 

-  2 


15  ja 


73 


12 


10 


VCc  CET  CEP 
PO  PE 

P1     D11  TC 

P2  QO 

74LS161 
CLR  01 

P3  02 

CL  Q3 
GND 

9 

0  

15  hsn_ 
14 

13 

12 

J! 

SYNC  OUT 
-<D14-14)  HO 
-<D14-13)  H1 
-<D14-12)  H2 
— (D14-11)  H3 


74 

1  V 

 ( 

<D13-12)  HPE 
<D13-14)  H4 
<D13-13)  H5 
<D13-11)  VA 


■(D12-14)  VB 
-CD12-13)  VC 
-(D12-12)  VO 
■<  D12-11  )  V1 


-<D11-14)  V2 
-(D11-13)  V3 
-(D1M2)  V4 


FIGURE  S-4  SYNC  COUNTER 
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io  n 


Q 

o 
cc 


2 

2 

5 

2 

i 

I 

< 

< 

< 

< 

CC 

oc 

cc 

CC 

cc 

CC 

CO 

CVJ 

CO 

LU 

UJ 

LU 

LL 

LL 

LL 

T 

^  ^  -j 
*  50- 


|CO|W 

lolcc 

CD 


g  LU  O 
r-  £  CL  D 
LU       ^3  — 1 


-H  -A  -A  ^ 


<      <         CQ  £C 


fill  O 


'0  ~0  s$ 


_  IKS 

LL       ^  5  -J 


6    6  6 


2  3 


cm     -<r         n  cr> 


IS 

to 


CO  N 

in 


0  !3E 


oHi'  5  j"g  g  5  g«S  oHi. 

J      ^.  (j)  to     10    cn     ^-     cm  ^ 


—  --co 


LL 

00  ^ 

IS 


O 


o 


Q 
< 


A. 

r\ 

A 

CD 

CO 

to 

CD 

CO 

m 

D 

LL 

5 

CO 

O 

00 

—i 

LU 

> 

LU 

CD 

CC 

O 

I 

X 

PA 

< 

X 
1  cc 

UJ 
X 

o 

t  CC 


*    eg1  r- 


o 

UJ 

5 
< 

CC 

CO 


CO 

I 

UJ 
CC 
D 

o 

LL 
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SCREEN 
ADDRESS 
FROM 
SYNC 
COUNT 
FIG.  S-4 


H3  (D14-11> 
H4  (D13-14> 


V3  (D11-13> 
V4  (P1V12> 


H5  CD13-13) 


HIRES  C  B11-6  >- 
FIG.  S-11 

VA  (D13-11> 

FIG.  S-4   

VB  (D12-14> 

FIG.  S-4   


PAGE  2  f  F14-6V 
FIG.  S-10   


SOFT  5  < 


40  (  4>0 


"D"  SOURCES  ARE 
FROM  SYNC  COUNT 
FIG.  S-4 


HO  (Dl4-14> 
2  <AD0>- 


H1  (D14-13)- 
3  <  AD1  >- 


+  5V 

Vcc 

S2 

A1 

A2 

E14 

A3 

23 

74LS283 

CO 

B2 

So 

B4 

B3 

Si 

A4 

B1 

C4 

GND 

!• 

73 


7<AD5 


70 


a  <  AD6 


AX 

40  <  4>Q  > 


H2  (P14-12> 
4  <AD2>- 


5  <AD3 


6  <AD4>- 
■  N.C.  V2  (D1M4> 


7  7  <AD9 


40  <   cj>0  > 


+5V 


VO  (D12-12)- 
9  <AD7>- 


74LS04 

(1/6) 


VCC 

S 

C12* 

Ma 

74LS257 

Mb  (i/2) 


Za 


10a 


Zb 


GND 


V1  (D12-11> 


75  <AD10> 


73  <AD11> 


h5V 


SO  S1 
12a 


Vcc 


E13 


74LS153 


Zb 


Ea    Eb  GND 


^>7  y*5^' 


74 


h5V 


SO  S1  VCc 
I2a 


I3a 

I2b 
I3b 
10a 
Ma 
lob 


E12 


74LS153 


Zb 


Mb 

Ea    lb  GND 


the 


i. 


SO  S1  Vcc 
12a 


E11 


74LS153 


I3a 
12b 
13b 
10a 
11a 
\0b 
Mb 

Ea    Eb  GND 


Zb. 


TEE 


♦SEE  FIG.  S-6  FOR  OTHER  HALF  OF  C12 


FIGURE  S-7  RAM  ADDRESS  MUX 
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FROM  4K/16K  SELECT 
FIG.  S-6 

^   


—  ~  \ 

ROWC     ROWC        ROWD     ROWD       HOWE  gWE 
CAS        CS/A6  CAS        CS/A6  CAS 


FROM 
RAM 
ADDRESS 
MUX 
FIG.  S-7 


^5V< — 
GNO  16 


-5V* 
RAM  3 


18  <R/WA      i  z   

RAS  4 


/FROM  SYSTEM 

DATA  BUS  3 


T-12V- 


Vbb 

GNO 

16 

01 

CAS 

^DECODED  BY  ROW 

R/W 

DO 

J±-  TO  LATCHES 

RAS 

CSI 
A6 

-^-DECODED  BY  ROW 

4K/16K 
A5  A2 
RAM 

A4  A1 

12 
11 

A3 

AO 

10 

Voo 

Vcc 

LATCHED 
RAM 
DATA 
OUT 


FIGURE  S-8  4K  TO  48K  RAM  MEMORY  WfTH  DATA  LATCH 
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o 
> 

CO 

< 

Q 
< 
2 


9rD 

go 

CC  >" 
LJJ52 

ZQ 


i<l 

lo 


i  LU 
CO 

O 


CM 

N.C.  i 

CM 

!  ON 

CM 

O 

— *-  ^ 

CM 

Nv 
<M 

cn 

CM 

CD 

CM  — 

o 

CD 

■r- 

— 

CM 

N. 
CM 

<r> 

CM 

00 
CM 

O 

o 

m 

CM 

CM 

CO 

CM 

00 

o 

"3 

CM 

K. 
CM 

CO 
CM 

00 
CM 

to 

o 

co 

N. 
CM 

CM 

CO 

CM 

in 

o 

eg 

~3 

.luco  _ 
So 


-5 


o  _ 


LU 

 I 

CQ 

LU  CO 

5  5 


CM 
X 


o  i 
z 


oh 
z 


m 

co 
> 


UJ 
CO 

O 

H 

o 
x 
z 
o 


o 

a 
o 


o 

DC 
O 

a 

Q 
Z 
< 

D 
O 

z 

CL 
DC 

e 

o 

UJ 

z 
z 

o 
a 


< 
£ 

UJ 
X 

a. 

UJ 

a 

i 

CO 
LU 
CC 

55 

LL 
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2 111 

CC  O  fi 
yj  Li. 

a 

O 
GC 


CO 

Q 
< 


150 


1C13-6J  TO  C12-14 
4K/16K 
SELECT 
FIG.  S-6 


FROM  ADD  uio„   

DECODER  Fl  4  Hjgg  ^ 


FROM  f  TpxT  ,  . 

ADD RR ESS  J  MODE  CFU-4 
DECODER  F14       MIX  rf^? 
FIG.  S-iO  [MODE 

FROM  SYNC  fV2 
COUNT 
FIG.  S-4 

FROM  SYSTEM  TIME  <RAS> 

FIG.  S-3   


ENABLE 
TO  H1,  C12 
4K/16K 
SELECT 

FIG.  S-6- 


FIGURE  S- 1 1    VIDEO  GENERATOR 
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oppkz  computer  inc. 


10260  BANDLEY  DRIVE 
CUPERTINO,  CALIFORNIA  95014  U.S.A. 
TELEPHONE  (408)  996-1010 


